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CONFIDENTIAL PROPRIETARY INFORMATION 

THIS ITEM IS THE PROPERTY OF DATAPOINT CORPORATION, SAN ANTONIO, TEXAS, AND CONTAINS CONFIDENTIAL AND 
TRADE SECRET INFORMATION. THIS ITEM MAY NOT BE TRANSFERRED FROM THE CUSTODY OR CONTROL OF DATAPOINT EXCEPT 
AS AUTHORIZED BY DATAPOINT AND THEN ONLY BY WAY OF LOAN FOR LIMITED PURPOSES. IT MUST NOT BE REPRODUCED 
IN rtHOLE OR IN PART AND MUST BE RETURNED TO DATAPOINT UPON REQUEST AND IN ALL EVENTS UPON COMPLETION OF 
THE PURPOSE OF THE LOAN. 

NEITHER THIS ITEM NOR THE INFORMATION IT CONTAINS MAY BE USED OR DISCLOSED TO PERSONS- NOT HAVING A NEED 
FOR SUCH USE OR DISCLOSURE CONSISTENT WITH THE PURPOSE OF THE LOAN, WITHOUT THE PRIOR WR I Tl' EN CONSENT OF 
DATAPOINT. 
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79DEC12 J 6x20 



COMMAND LINE rtAS* SNAP3 PR0C14G3.PR0D, » ,PR0CI4G3;GBQLX 

INCLUSION A» PROCINC/TXTiDRO 
INCLUSION B» PROCJ4G3/LIB»DR0.PMACMIC 
INCLUSION C* PROC14G3/LIBXDR0.GMACROZ 
INCLUSION at PROC14G3/LIBXDR0.PROCEQUS 
INCLUSION E^ PROCI4G3/LIB^DR0.BDEFI800 
INCLUSION F« PROCJ4G3/LI,B«DRO.MD£F18 00 
INCLUSION G» PROC)4G3/LIB4DR0.POHTEQUS 
INCLUSION H» PROC14G3/LIB*DR0.PORTASGN 
INCLUSION I* PROC14G3/LIB»DR0.PROCPARM 

PROGRAM NAME I PROD 



PROGRAM ADDRESS BLOCKS^ 



EXTERNAL DEFINITIONS i 



FETCHRW 


002000 


FETCHL 


0020 1 3 


CALL 


002032 


PUSH 


002 1 1 1 


RETURN 


002152 


POP 


0^2212 


SIRO 


00242 1 


LD7 


002502 


AP7 


002551 


SRVRTW 


002653 


BT 


003000 


BCP 


003123 


SLC 


003341 


PLR 


003405 


DEC PA 


003473 


DS 


003631 


EI 


003730 



01 0000 


/ABSOLUTE/ 


SIZE^ 


=000000 (ABS 




167400 


/SYSIVR/ 


SIZE= 


= 000400 (ABS J 




170000 


/SVSROM/ 


SIZE= 


=000047 (ABS- 




002000 


/PRODL/ 


SIZE^ 


= 002000 (ABS. 




000000 


/PRODPy 


SIZE= 


= 004000 (REL 




FETCHrt 


002003 




FETCH 


002005 


SHVDO 


002645 




CAII CC 


002026 


MEMPF$ 


002221 




PCMOD 


002100 


PUSH I 


002117 




EIROJ 


002 I 42 


RETCC 


002147 




RETS 


002206 


STKS 


002277 




RIN16 


003202 


SIRX 


002430 




JUMPCC 


002441 


L7S 


002523 




LDS 


002537 


APS 


002565 




SRVRPT 


002636 


BEEP 


002 703 




CLICK 


002715 


RIN256 


003105 




RIND 


003210 


BFSB 


003215 




BFAC 


003??1 


SRC 


00 3350 




SRE 


003361 


PSH 


003427 




INCPA 


003444 


DECP 


003500 




DECX 


003522 


DLHL 


003633 




DL 


003637 


DI 


003741 









EXTERNAL REFERENCES (UNDEFINED SYMBOLS): 
SCROMLI SCRAMI SYSRETl IVIOLS DL$DO 

UNUSED LABELS* 
BTR 



SCDON 



SCLST 



FETCHN 


002010 


NOJ 


002444 


PSHSTO 


002054 


JUMP 


002447 


POPSTO 


002 1 55 


SYSRETO 


0023 72 


LD6 


002467 


AP4 


002542 


SRVNXT 


002643 


AC$DO 


002 724 


RINST 


003113 


BFS 


003273 


CCS 


003400 


INCP 


003451 


INCX 


003525 


BRL 


003714 
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MICHO-PROCESSOtt EMULATION SUPPORT CODE - HJS - 



( 



79DECJ2 J 6: 20 



2. 

3. 

4. 

5. 

6. 

7. 

8. 

9. 
10. 
I). 
12. 
13. 
14. 
15. 
16. 
17. 
18. 
19. 
20. 
21. 
22. 
23. 
24. 
25. 
26. 
27. 
28. 
29. 
30. 
31 . 
32. 
33, 
34. 
35. 
36. 
37. 
38. 
39. 
40. 
41 . 
42. 
43. 



2. 14. G 
2.J4.F 
2.14.E 
2. 14. D 
2. I4.C 
2.14.B 
2. 14. A 



2, 
2. 



13. B 
13. A 



2. 12. C 

2. 12. A 

12 



HJS 
HJS 
HJS 
HJS 
HJS 
HJS 
HJS 

HJS 
HJS 

HJS 
HJS 



. 2.9.L HJS 

. 2.9.K HJS 

. 2.9.K HJS 

. 2. 9. J HJS 

. 2.9.1 HJS 

. 2.9.H HJS 

. 2.9.G HJS 

. 2.9.F HJS 

. 2.9.E HJS 

. 2.9.D HJS 

. 2.9.C HJS 

. 2.9.B HJS 

. 2. 9. A HJS 

. 2.8.B HJS 

. 2. 8. A HJS 

* 

. 2.7. HJS 

. 2.H.B HJS 
* 

. 2.5. C HJS 

. 2.5.B HJS 

. 2. 5. A HJS 

* 

. 2.4.B HJS 

! 2. 4. A HJS 



79 NOV 
79 OCT 
79 AUG 
79 AUG 
79 JUL 
79 APR 
79 APR 

79 FEB 
79 JAN 

78 OCT 
78 SEP 



78 JUL 
78 JUN 
78 APR 
78 MAR 
78 f^Q 
78 FEB 
78 FEB 
78 JAN 
/8 JAN 
77 DEC 
77 DEC 
77 NOV 
77 NOV 



30 
8 
13 
10 
27 
17 
2 

7 

22 

12 

05 



18 
16 
23 
20 
27 
16 

3 
II 

4 
21 
13 
20 
14 



77 SEP 22 

77 SEP 19 

77 SEP 7 

77 AUG 31 

77 AUG 16 

77 JULY 13 

77 JULY 12 

77 JULY 12 

77 JULY 7 



INSERT TIMING FOR. THIS VERSION 

CHANGE OVER TO HONEYWELL BEEPER (SOUNDS BETfER) 

FINAL CLEANUP BEFORE WORKING VERSION 

FIX THE BUGS STILL LEFT 

CLEANUP NEW CODE BEFORE TEST IT 

RE-ORDER ROUTINES TO FIT BETfER 

START MODIFICATIONS FOR INTERNAL RIM 3800 

ENABLE COMM ON 3800 PROCESSORS 

FIX REGS BUG TO ALLOW ACCESS TO PROTECTED STACK 

CORRECT MEMORY FAULTS SO PC MATCHES 6600 PC 
.REFORMAT, RE-COMMENT, AND FIX STACK FOR ACCESS 
SET VERSION NUMBERS TO MATCH i FROM DEBUG 

FIX ANOTHER HONEYWELL BUG 

FIX BUG INTRODUCED IN HONEYWELL CODE (TZ TO FZ) 

SPLIT PROC, MAKE RELOCATABLE, CHANGE APF, ADD AML 

RESTRUCTURE INTERRUPT SEQUENCE & MINOR MODS 

CORRECT 9.H FOR FAULT CLEANUP 

EVERYBODY MEMPF-'S, KEYBOARD SCAN, & SIR CHANGE 

CORRECT TIMING, COMMENTS, & ADD POR TIMEOUT 

FIXING MIN/MOUT TIMINGS 

TESTING REPEATED KEYIN CONTROLS 

CORRECT STL INSTRUCTION 

BACK OFF FROM KBD RPT & RE-DO STL FOR TIMING 

INCLUDE TIMINGS AS CALCULATED & FIX MINOR BUGS 

CHANGE KEYBOARD CODE TO AID REPEATED KEY CONTROL 

MTI CHANGE SO LENGTH IS 2 BYTE NUMBER 

MTI CHANGE TO ALLOW MFRPT ON ANY INTERRUPT 

MINOR BUG-FIX AND OPTIMIZATION FOR RELEASE 

MTI SPECIAL VERSION 

UPDATE COMMENTS ON THE CODE 
CORRECTED NAMES FOR COM REGISTERS 
UP TO NEXT NEW VERSION NUMBER 

FIXED ILLEGAL MAR CHANGE IN REGL RETURN TO FETCH 
FIXED FILE TO CONFORM TO VRP FORMAT (A LIITLE) 
INITIAL PRE-RELEASE OF THE MICRO-CODE 
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44. 




45. 




46. 


£ 


47. 


002000/ 


48. 


000000 


49. 


002000 


50. 


000000 


51. 


002 000L 



I Off /^ffPi^)/PiiOOL 

'' u PttODP 



PttODP 
PHODL 

,PRODP 



INC 

ORG 
ORG 
USE 
USE 
LOG 



PROCINC 

PROD 


PRODL 
PRODP 
PRODL » 2 



LOGICAL SPACE. DEFINED IN PLACE 
PHYSICAL SPACE RELOCATABLE 
USE THEM BOTH 

PUT THE CODE IN. PHYSICAL SPACE 
rtlTH ADDRESSES IN LOGICAL SPACE 
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54. 










55. 










56. 








' 


57. 










58. 










59. 


002000L 


11000100 


11111111 




60. 










61. 


002001L 


00 110001 


1101 1100 






002002L 


00110111 


00000100 




62. 










63. 


002003L 


11000100 


1 1 1 1 1 1 00 






002004L 


110001 11 


01101 1 11 


( 


64. 










65. 


002005L 


00 110001 


1 J 00 1001 






002 006L 


00 110001 


11101 000 


( 




002007L 


00 1101 11 


0000 1100 




66. 










67. 


0020 lOL 


00110001 


10001001 


( 




0020 IlL 


00 1 1 000 1 


10101 000 






0020 12L 


00 I 101 11 


0.1 000 1 1 1 




68. 








( 


69. 


0020 I3L 


01010001 


00000000 






002014L 


00 1 1 1 1 1 


00000001 




70. 








( 


71. 


0020 15L 


00 110001 


00 1 1 0000 




72. 


0020 16L 


1 1 01 00 1 


01011010 




73. 








( 


74. 


00201 7L 








75. 


0020J7L 


11000100 


1 1 1 1 0000 






002020L 


110001 11 


01101 1 11 


( 


76. 










77. 


002021 L 


00 1101 11 


00001100 




. 78. 


002 22 L 


00 11 0001 


00 110 110 


( 




002023L 


00 1101 11 


00000000 




79. 


002024L 


00 1 11001 


00 110100 






002025L 


10101 1 11 


00110011 


( 


80. 










81. 










82. 








( 


83. 
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MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. FETCH NEXT INSTRUCTION 



79DEC.12 J 6120 



. GET NEXT INSTRUCTION IN SEQUENCE AND GO TO IT 

. UNLESS SERVICE REQUEST INTERFERES (RETURNS TO SRVEND SO CODE CAN NEVER 

. BE LOCKED OUT! ) 



FETCHRWt MWAIT 
. 3. 10 

LDPP 



FETCHrti MWAIT 
DLDX 



. 2.70 
FETCH* 



. 2.50 

FETCH N-x 



. 2.05 
FETCHLt 



1 .60 



SRVEND 
FETLIMP 



1. 10 



SRVID 



DLDX 



LDPI 



TSTPT 
BRA 



MWAIT 



STB 
LDPP 

BRPX 



, IGNORE 
MODW.PSWI 

,M£MPF2 

PC2MR,,IMAR 

MR2PC,»SMR 

LIMP,0 



FI,SRVREQ 
SRVDO,FZ 



, MEMPF2 



I MAR 
LIREG,MDR 

IDCOD 



ENTRY IF WRITE OPERATIONS & TEMPORARY MODW 

RESTORE CORRECT PROTECTION BEFORE FETCH 

(EXTRA MWAIT AS FAST AS BRANCH AROUND IT) 
ENTRY IF WRITE OPERATIONS LAST 

ENTRY IF MAR MUST BE LOADED (NORMAL) 
ENTRY FOR JUMP OR CALL (P.C. OK?) 
IMPLICIT REGISTER ZERO 



SERVICE REQUEST? 

YES, DO IT & SAVE MAR ETC. FOR RETURN 

SERVICE RE-ENTRY, IMP, MAR & PC ALL OK? 
ERROR IF MEMORY FAULT 



!! SPEEDUP FOR THOSE THAT CAN USE IT !! 
LOAD INSTRUCTION REGISTER 

GO TO THE ROUTINE 



. NOTE* PC LEFT POINTING AT THE INSTRUCTION BYTE JUST FETCHED 
MAR LEFT POINTING AT THE NEXT BYTE SO IF MULTI-BYTE 
INSTRUCTION, CAN START WITH AN SMR FOR A LITfLE SPEEDUP. 



( 
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86. 

87. 

88. 

89. 

90. 

91 . 

92. 

93. 

94. 

95. 

96. 

97. 

98. 

99. 
100. 
101 . 
102. 

103. 
104. 
105. 
106. 
107. 
108. 
109. 
110. 
Ml. 

112. 

113. 
114. 

115. 
116. 



117. 

118. 
119. 

120. 



PH0C14G3/LIB 



002 0.2 6L 



002026L 
002027L 
002030L 
002031L 

002032L 



002032L 
002033L 
002034L 
002035L 
002036L 
002037L 
002O40L 
00204 1 L 
002042L 
002043L 
002044L 
002045L 
002046L 
002047L 
002050L 
00205JL 
002052L 
002053L 



11001000 
00 I 10001 
01000101 
11 01 00 11 



00 1101 It 
01010001 
00 1 1 I I 1 
110001 00 
1 1 000 I 1 1 
00 1 101 1 1 
00 110001 
01101 1 II 
00110 I II 
1 1 00 I 1 1 
II 000100 
It 0001 II 
00 I 1000 I 
QIIOI 1 II 
00 I 101 II 
00 1 10001 
00 I t OOD 1 
01010001 



1001 1100 
00 1 1 0001 
00000001 
IIOIIOII 



01000 1 11 
00001001 
00000001 
1 1100010 
OtIOl 110 
00001100 
00 1 10 1 10 
t I 1100 10 
010001 II 

1 1 II 1 1 II 

llOllOt 1 

1101110 

001 to no 

1 I 11000 I 
0000 I 1 00 

1 000 too I 

t 01 01 000 
10 I I I 1 11 



MICHO-PH 
. SUBrtOU 

* 

CALLCC: 



7.90 ( 



OCESSOP EMULATION SUPPORT CODE - HJS - 
TINE CALL AND STACK PUSH 



79DECI2 16»20 



( 

1.05 



tC2) CCC.LSB.MSB 
NOT TAKEN) 



102) 
112) 
122) 
132) 
142) 
152) 
162) 
172) 



CFC.LSB 
CFZ.LSB 
CFS.LSB 
CFP.LSB 
CTC.LSB 
CTZ.LS8 
CTS . LSB 
CTP.LSB 



.MSB 
.MSB 
.MSB 
.MSB 
.MSB 
.MSB 
.MSB 
.MSB 



.5.45 ( I I t 102) UR 



* 

CALL* 

\ 7.45 



-B+M — tfsa«3:,£«^-TZ— - 

TSTIP ,ST.USCF, STATUS 

BRA NOJ,TZ 



106) CALL. LSB. MSB 



STB 
LDPI 


SMR ' 

LIMP,PCL 


MWAIT 


,MEMPF$ 


STB 
LDRP 


I MAR 

TEMPL,MDR 


STB 
MWAIT 


SMR 
NOOP,MEMPF$ 


LDRP 


TEMPH.MDR 


STB 
DLDX 


I MAR 
MR2PC 



^/f 



CONDITIONAL CALL 
(SP-2 I SP-1 ) <~ PC 
FALSE CARRY 
FALSE ZERO ( .NE.~) 
FALSE SIGN (.GE.) 
FALSE PARITY (EVEN) 
TRUE CARRY 
TRUE ZERO (.EQ. ) 
TRUE SIGN (.LT. ) 
TRUE PARITY (ODD) 

USER RETURN 






ii^TEft-itfiTtmNr~NOT~T^~e-ALL ! 
IS USER CC CORRECT? 

NO, DO NOJ. NOT A RETURN 



UNCONDITIONAL CALL 
(SP-2 I SP-I ) <- PC 
^^ <- SP-2; PC <- NN 

PC TO BE PUSHED ONTO THE STACK 



SAVE LSB 



SAVE MSB 

POINT MAR TO THE NEXT INSTRUCTION 
SO PUSHED P.C. IS CORRECT 



BAL 



» PCMOD 
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12J. 
122. 
123. 
124. 
125. 
126. 
127. 
128. 
129. 



130. 
131. 

132. 

133. 
134. 

13t). 
136. 
137. 

138. 
139. 
140. 
141 . 
142. 
143. 
144. 
145. 
146. 
147. 
148. 

1 49 . 

150. 



151. 



002054L 
002055L 



01101111 10 110000 



002055L 
002056L 
0020 5 7L 
002060L 
002061L 
002062L 
002063L 
002064L 
002065L 
002066L 
002 06 7 L 
002070L 
00207 IL 
0020 72L 
002073L 
0020 74L 
002075L 
002076L 
0020 77L 



0021 OOL 



002100L 
0021 OIL 
002102L 
0021 03L 
002 1 04L 
002105L 
002106L 
0021 07L 
002 110L 



00 1 10001 
OIOIOIOI 
00 1101 1 1 
00110001 
00 1 10001 
01010100 
01010011 
00 1101 II 
00 1101 11 
00 110001 
00 110 Ml 
00 I 1 I I I 
00 1 1 OttO 1 
11000100 
1 1 000 1 1 1 
00 I 1 I I 1 
1 1 00 I 1 1 1 
00 1101 11 
11101111 



110 I 1100 
1.1 111011 
00000100 
1 1101010 
IIOllOll 
00000010 
01000000 
10001011 
1 1000000 
1101 1 1 II 
00101001 
00001001 
110 11111 
11000101 
11000000 
00001100 
11000001 
00101001 
00000000 



11000100 
11000 1 11 
00 1 I 000 I 

00 1101 11 
01 110001 
00 1 1 1 1 1 

01 110001 
00 1101 II 
1 1 00 I 1 1 1 
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MICRO- PROCESSOR EMULATION SUPPORT CODE - HJS - 
. SUBROUTINE CALL AND STACK PUSH 
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+ 

PSHSTO » 
PSHSTK 
. 2.70 



BAS LINK,CC 
+0.20 INTO MEMORY WAIT 
NOTE* 



(2.80) IN-PAGE ENTRY TO PUSH 

OFF-PAGE ENTRY (LINK .REfURN PRE-LOAOED) 

MUST HAVE CARRY CLEAR TO USE THIS /ENTRY 








.DOPIP 



LDX 
DOT IP 

DOPI 

LDPT 
LDPP 

-STB 



CAN NOT PARITY CHECK IN HERE OR LOST FOREVER WITH 
MEMPF$ & SYS CALL & PUSH ! !! 

M0DW,ND,-1-SWUSER,PSWI ALLOW STACK IN ACCESS PRO'/^CTED MEM 

SP2MRH 
,SB.2,SPIL 



MEMPFPS 



LDTP 
MWAIT 

STB 
DELAY 
LDPT 
BRR 



SPOL,OR,0100 

MAHOL 

MDW.IMPI P/n/^ 

IMP I 

.MEMPFPS 

I MAR 
2 

MDW 
LINK 




jsriF J^^i^"^ 






POINT TO MEMORY STACK 
UPDATE THE SP 

MAKE SURE EVEN & WRAP AROUMD (MOD 32/64 

SAVE UPDATED LSB 
STORE LSB THERE 



PRE-LOAD MSB DATA TO WRITE 

*** LET THE CALLER WORRY ABOUT IT *** 

NOW POINT & DO THE MSB TO FINISH OFF 



**• NOTE ROUTINE CALLING PSHSTK OR PSHSTO MUST HAVE MWAIT ,ADDR •** 
*** AND MUST RESTORE MODW FROM THE PSW •*• 
* 

pcmooj 

. 1.60 (with mwait without fetchn) 



RETURN FROM PSHSTK AND SET NEW PC 




10 111111 
OllOt 110 
1 1 1 I 1 00 
00000100 
1 1 110010 
1000000 
I 1 I 1 000 
1 1100000 

no 




MWAIT 
LDPP 
LDPR 

BRA 



♦MEMPFS 
MODW.PSWI 

MAR,0,TEMP 

FETCHN 



RESTORE CORRECT MODE 
LOAD UP SAVED P.C. 

GO TO ADDRESS AT MACRO LEVEL 



( 



PAGE 



152. 
153. 
154. 
155. 
156. 
157. 
158. 
159. 



160. 

161. 
162. 
163. 
164. 
165. 
166. 
167. 
1 68 . 

169. 

170. 
171 . 

172. 
173. 



1 74. 
175. 

176. 
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002 1 ML 



0021 ML 
002 112L 
002113L 
002 114L 
002115L 
002 1 J 6L 

002 1 1 7L 



002 117L 
002120L 
002 12 J L 
002 1 22L 
002123L 
0021 24L 
002 125L 
002126L 
002127L 
0021 30L 
0021 3 IL 
002132L 
002 1 33L 
0021 34L 
002135L 
0021 36L 
002137L 
002140L 
002 1 4 1 L 



01010001 
Ql 10.1 1 11 
1 100 1 000 
01010001 
00 1 1 1 1 1 
1 1 00 I 1 1 J 



OOIIO 1 11 
01010001 
00 110 1 11 
11000100 
11000 1 11 
00 I t 1 1 1 
00 1 10001 



00 1 
00 1 
00 1 
00 1 



101 n 

10111 
10001 
10001 



00 1 1 1 1 1 
11 000100 
110001 II 
00 110001 
00 1 1 1 1 1 

00 1 I 1 1 1 
OIOIOOOI 

1 1 OX) I 1 1 1 



1 1 11 1 1 II 

10 110000 
1101 0010 

00000 110 
00000001 

1 101 0010 



010001 11 
0000 1 1 II 
00000001 
10101101 
01101110 
00001100 
00 1 1 I I 
10001 1 11 
01000 1 1 1 
10001001 
lOJOIOOO 
00001001 
10100100 
110 1110 
00 110 110 
10001 1 11 
00001 000 

11 111111 

1 1 1 00 1 1 
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* 

PUSH* 
. 4.05 
. 3.70 
. 3.70 
. 3. .70 



( 070) PUSH 

(062 070) PUSH 

(174 070) PUSH 

(022 070) PUSH 



BJ^i 



(S,P-1 I SP-2) <- HL; SP <- SP 

BC 
DE 
XA 

IAC3 

PSHSTKi,Fe,IZ,FETCH»*r,CC REG PAIR SPEC IF I EDI 



- 2 



LDP I 
BRA 



LIMP, URL 
PSHSTK 



DEFAULT 



* 
PUSH I » 

\ 6.20 



( 051) PUSH. LSB. MSB 

STB SMR 

LDPI LIMP.IMPL 

MWAIT 



BRC 



LLC?/' /^x^ 



PUSH CONSTANT (ADDRESS?) ONTO STACK 
(SP-I I SP-2) <- NN; SP <- SP - 2 

GET THE IMMEDIATE VALUE 
AND HIDING PLACE 



,MEMPF$ 

STB I MAR 

LDPP IMPO,MDR 

STB SMR 

DLDX MR2PC,,DIMP 

MWAIT »MEMPF$ 

LDPP IMPO,MDR,IIMP 



GOT LSB 

SAVE THE UPDATED P.C. 

GOT MSB, POINT CORRECTLY FOR PUSH 



PSHSTO,,FETCHar' RETURN .FROM PUSH TO FETCH WAIT 



LL^/ 



^ LL/)^1^ 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 



PAGE 



179. 
180. 
181 . 
182. 
183. 
184. 
185. 
186. 
187. 
188. 
189. 
190. 
191 . 
192. 



193. 
194. 
195. 
.196. 
197. 
198. 
199. 
200. 
201. 
202. 
203. 
204. 
205. 
206. 
207. 
208. 

209. 
210. 
211. 
212. 
213. 
214. 
215. 

216. 



PkOC14G3/LIB 
002I42L 

002142L 110110 11 11011000 
002143L 



MICRO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 79DEC1 2 J6»20 

. RETURN CODES USER & CONDITIONAL & REGULAR, AND STACK POPPING 



■k 
EIROJJ 



i 062 050) EUR 
4.10 (111 050) EJMP.LSB.MSB 
-_BftA -J^AH^tT^, TO 



ENABLE INTERRUPTS & USER & 

PC <- (SP+1 I SP)I SP <- SP + 2 

ENABLE INTERRUPTS & PC <-__NN 



* 

USERET 
. 6.40 

• 

. 5.45 



002143L 00 110001 110 1 1100 
002 144L 010100 I 1 00000100 
002145L 00 1101 11 10001100 



002146L 11001 I II 10010101 
002147L 



(.062 050) EUR 

( I 1 .1 1 02 ) UR 

. DO.PIP PSrtO,OR,SWUSER,PSWI SET USER MODE 



ENABLE INTERRUPTS 
PC <- (SP+1 I SP) 
USER RETURN 










USER & "'" / J Iv /<^ /r 



J 



STB 
BRA 



MODrt 
RETURN 



^CLf>^^ /^ 




O^P/"'" 



002147L 
002150L 
002I51L 

002152L 



00 110001 
01000101 

1 1 0000 1 I 



00 110001 
00000001 

1 I 1101 11 



002152L 01010001 
002153L 00 110 1 1.1 
002154L 01010001 



00001001 
00000001 
1 1 1 1 00 I 



( 0C3) RET 
5.00 (0.45 NOT TAKEN) 

003 ) RFC 

013) Rfl 

023) RFS 

033) RFP 

043) RTC 

053) RTZ 

063 ) RTS 

073) RTP 



TSTIP ,SfUSCF, STATUS 

BRA FETCHN.TZ 



RETURN* 
. 4.65 



( 



007) RET 



LDPI 
BAL 



LIMP,PCL 

,RETS 



EXTERNALLY ALSO IN EMULATION AIDS 



CONDITIONAL RETURN 

PC <- (SP+1 I SP)» SP <- SP + 2 

FALSE CARRY 

FALSE ZERO (.NE.) 

FALSE SIGN ( .GE. ) 

FALSE PARITY (£\^EN) 

TRUE CARRY 

TRUE ZERO (.EQ.) 

TRUE SIGN (.LT.) 

TRUE PARITY .(ODD) 



/<!-^,-'-'^^<^^^^ZZ_^ 



UNCONDITIONAL RETURN 

PC <- (S.P+1 I SP.)I SP <- SP + 2 

POP STACK INTO PROGRAMME COUNTER 

RETURN FROM POP TO SPECIAL STARTUP 



( 
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217. 
218. 
219. 
220. 
221 . 
222. 
223. 



224. 

22b. 
226. 
227. 
228. 
229, 

230. 

231 . 
232. 

233. 

234. 
235. 

236. 

237. 
238. 
239. 
240. 
241. 
242. 
243. 



244. 
24b. 
246. 
247. 
248. 
249. 
250. 
251 . 
252. 
253. 



254. 



PR0C14G3/LIB 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. RETURN CODES USER & CONDITIONAL & REGULAR, AND 



79DECJ2 J 61 20 
STACK POPPING 



002155L 
002156L 



OllOIlM 1011 0000 



• 

POPS TO t 
PQPSTK 
. 3.55 



002156L 00 110001 1 1101010 

002157L 001 lOODl 11 I 1 1 00 

002160L 01010101 1 1 1 1101 I 

0021 61 L 00 1101 11 00000100 

002 162L 00 1 10001 11001011 ^ofsT/</^ 

002163L 00 1 101 11 010001 1 1 

002 164L 01010101 10 1 11 1 11 

002165L 01010010 00000010 



002 1 66L 
002167L 
002170L 
0021 71 L 
002 1 72L 
0021 73L 
002 1 74L 
0021 75L 
002 1 76L 
0021 77L 
002200L 
002201 L 
002202L 
002203L 
002204L 
002205L 

002206L 



00 2206L 
002207L 
00221 OL 
0022 ML 

0022 12L 



00 2212L 
0022 13L 
002214L 
0022 15L 
00 22 16L 



01 01 00 11 
00 1101 11 
11000100 
110001 II 
00 I 10 I II 
00 I I 0001 
00 1101 II 

00 1101 11 

001 101 II 
11000100 
00 11 000 I 
00 I 101 1 1 

00 110001 
OOIIOI 11 
II 100000 

1 1 00 1 1 1 I 



00 110001 
00 1 I 000 I 
00 1101 II 
11 00 1 1 1 1 



01010001 
QllOl 1 11 
II 00 1 000 
01010001 
00 1101 II 



01000000 
lOOOIOll 
1 0000 I 1 1 

1 10 1 no 

0000 1 1 00 

00110 no 

I 000 1 1 1 1 

I 000 1 1 1 ^_^ ^/ ^ ^u^6 '^/'^ 

0000 1 00 1 ^.. /o^^r^X.-n. 



10000000' 

110 1 1100^^^^ ' 

oooflxu-oe--^ 

00 I 1 I 1 f^/'S 

1 0001 I 11 
00000000 

oiioi no 



T^jQrr,/^/, 




M.X 



MWAIT 

pp 

LDPP 

BRR 
BRA 



* 

rets: 
. 0.65 



I 1101000 

II 00 1001 
01 000 I II 

. 1 I II I 00 



• 

.POP* 
. 4.30 
. 3.95 
. 3.95 
. 3.95 



BAS LINK,CC 



LDX SP2MRH 

.{jJOPIP MODW^,^ll.-l-SrtUSER 

LDX SP2MRL,SMR 

DOTI ,ND,-1-0100 

DOTI .AC, 2 



DOPI SPOLvOR,0100 

MWAIT ,MEMPF$ 

STB I MAR 

LDPP IMPO,MDR 



SMR.DIMP 

, IGNORE • 
MODW,PSrtI 

IMPO.MDR 

LINK,F@,MP 
MEMPF$ 



(3.65) IN-PAGE CALL 

POP THE STACK TO IMP AND IMP-1 

CARRV MUST BE CLEAR TO USE THIS ENTRY 

POINT INTO THE STACK AREA 
,PSWI ALLOW ACCESS TO PROTECTED MEMORY 



(SAVE 150 N.SEC BY INVERTING ORDER) 

TURN OFF WRAP-AROUND BIT 
SKIP TO NEXT ENTRY TO POP 
NOTE* (STKS) ASSUMES FALSE CARRY 
GENERATED HERE (TO SAVE WORD) 
SET BIT ON TO FINISH WRAP-AROUND 



DLRX PC2MR,,SMR 



BRA FETCHL 



( 060 J POP 

(062 060) POP 

( 174 060) POP 

(022 060) POP 



SAVE LSB DATA 

GET MSB DATA 

PUT MEMPFS AFTER LDPP, BETTER STACK! 

SAVE MSB DATA 

(AND DO A SLIGHT SPEEDUP) 

LOAD THE MAR FROM P.C. VALUE (NO IMAR) 



HL IS POPPED FROM STACK 
BC 

XA 

RP <- (SP+1 I SP); SP <- SP * 2 



1 I 1 11010 
10 110000 
10010001 
00000 110 
00000001 



BRS 



LDP I 



POPSrK,Fe,IZ,FErCH,CC imp points to REG-PAIR ALREADY 



LIMP, URL 



DEFAULT USES HL 



( 

DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 



PAGE II PH0C14G3/LI3 MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 79DEC12 16*20 

. RETURN CODES USER & CONDITIONAL d REGULAR, AND STACK POPPING 

2 55. 00 221 7L 1 1 00 i I 1 I 10010001 BRA POPSTK 



DATAPOINT CONFIDENTIAL INFORMATION - SHE PAGE 1 



PAGE 1 2 



PRQCI4G3/LIB 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. MEMORY PARITY FAULT CODE! VERY rtEIRD! 



79DEC.12 16*20 



258. 
259. 
260. 
261. 
262. 
263. 
264. 
265. 
266. 

267. 
268. 
269. 



270. 
271. 



272. 
273. 
274. 
275. 



0G2220L 
00222 IL 



U 1 1 1 00 1 1 t 1 1 1 I I 



IF FROM WRONG EVEN/ODD PAGE PAIR 



276. 
2 77. 

278. 

279. 
280. 

28 1 . 
282. 

283. 

284. 
285. 
286, 
287, 
288. 
289. 
290. 

291 . 
292. 
293. 



00 2221 L 
00 2222L 



002223L 
002224L 
002225L 
002226L 
002227L 
002230L 
002231L 
002232L 
0022 33L 
002234L 
002235L 
002236L 
002237L 
00 2240 L 
002241 L 
002242L 
U02243L 
0022 44L 
002245L 
002246L 
00 2247 L 
002250L 
002251L 
00 22 52L 
002253L 
002254L 
00 22 55 L 
002256L 
00225.7L 
00226OL 
00 226 I L 
002262L 
002263L 
0022.64L 
00 2265L 
>002266L 
>002267L 

002270L 
00227 IL 



00 1 1 000 1 
OlIOII 11 



00 1 1 000 1 
OIOIOIX)] 
00 1 1 It 1 
01010001 
00 1101 11 
00 110001 
00 I 101 11 
00 1 1000 I 
01010101 
01 000000 
11000010 
OlOlOOOl 

00 not 11 

01010001 

00 not 11 

00 1 10 II 1 

00 110001 
1 1 000100 

1 10001 II 
00 110010 
00 1 1 t 1 1 

00 1 10 1 n 

01010001 
1 1 00 I I 1 1 
OtOlOOOl 
11 000100 
11000 1 It 
01 110001 
01000101 
It 000010 
01000101 
It 000010 
000101 
000010 
010001 
1 0, 1 1 0.0 1 
1 1 00 t 1 1 1 











001 

tot 



oil 

0001 



01010001 
It 00 I I 1 1 



not I too 
1 1 1 lion 

00000100 

0000 tin 

00000001 
lOOOl I It 

0000 I 00 I 

1 0101 I I 1 
I 1000000 
10000000 

010101 n 

I 1101 1 11 

1 n 00000 
loioton 

I 1000000 
010001 it 

lion 1 11 
oionoi I 

01010100 

00 1 1 n 

10001 I It 

00001 000 
01010100 

I I I 00 I I 

00000 no 

0101 00 II 
0.1 00 I 00 1 
I I 110001 
10000000 
010001 11 
0.1000000 
01 0000 It 
00000001 
0.1000101 
000 too 10 

1 1 1 1 1 1 11 
11111111 

000 1 ton 

01 00 1 001 



* 

MEMPF2 BPGX S 
MEMPF$« 

, ic-kifie'kie'kirk 

. P.C. UPPED TO NEXT INST. WHEN GET MEMPF, WILL ALWAYS ASSUME IT CORRECT 
.HOPING TO POINT TO THE NEXT INSTRUCTION. 
, *********** 



A7^/7/v<§y^ 



MEMNBAS 

MEMPQ 



MEMPX 
MEM PS 



LDRP 

STB 

DOPIP 

LDP I 
DLDX 



DOTI 
TSTIT 
BRA 
DLRPI 

-!>"/? 

LDTP 
MrtAIT 

DOPP 

STB 
BRC 

LDTI 
mklT 

TSTIR 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

LDTI 

BRAX 



LDTI 
BRA 



TEMP1,STEK,CC 
CMPF 



GET AND SAVE STATUS WORD 



CLEAR THE FAULT (NOT NECESSARY) 
(THE NEXT READ/WRITE DOES IT) 
M0DW,ND,-1-SWUSER,PSWI ENABLE MEMORY ACCESSING 



LIMP,IMPL 
MR2IM,DIMP 



USING HIDDEN REGS AND PSHSTK 
SAVE THE MAR ON THE STACK 



»ND,0300 
XR,02 00 
MEMNBAS.FZ 
MARO^SEBRLSrr^MlT' 

IMPI 
, MEMPQ 

IMPO,AC,MDR 

I IMP 

SRSYSMF 
.MEMPX 

,STLSP,TEMPI 

MEMPS.FZ 

♦ STLW 

MEMPW.FZ 

,STLA 

MEMPA,FZ 

SRMEMPE 

SCROMLI 



HIGH BIT ON, NEXT BIT OFF? 

NO, IN. ANOTHER 1 6K CHUNK 

IN BASED AREA, GET BASE REG VALUE 



SO ADDRESS MATCHES 5500 VALUE 
! !1 HELP !!! 

ADD IN BASING 

POINT TO LSB TO SAVE 

PUSH MAR VALUE ON THE STACK 

ASSUME THE WORST, GOT ANOTHER FAULT 

• • • ild.«> • • • 

SP» SECTOR TABLE PARITY FAULT 



WV: WRITE VIOLATOIN FAULT 

AV« ACCESS VIOLATION FAULT 

MP» MEMORY PARITY FAULT 

THESE ERRORS GO TO ROM VECTORS! 



SRSTPE 
MEMPX 



SECTOR, ROM VECTOR 



r 

DATAFOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

PAGE 13 PR0C14G3/LIB MICHO-PHOCESSOR EMULATION SUPPORT .CODE - HJ5 - 79DEC,1 2 16i20 

. MEMORY PARITY FAULT CODE! VERY WEIRD! 

294. 

295. 002272L 01 01 0001 00011000 MEMPA LDTI SVAVIOL ACCESS, HAM VECTOR 

296. 002273L 1 1 00 1 1 I 1 01000010 BRA MEMPR 
297. 

298. 002274L 01010001 00010010 MEMPrt LDTI SVWVIOL WRITE, RAM VECTOR 

299. >0022 7bL 01 Oil 001 11111111 MEMPR BRAX SCRAMI AND THESE GO TO RAM VECTORS 
>002276L 11001 I 11 I li 1 1 1 11 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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302. 
303. 
304. 
306. 
306. 
307. 
308. 
309. 
310. 
311 . 
312. 
313. 
314. 
315. 
316. 
317. 
318. 
319. 
320. 
321. 

322, 

323. 



324. 

325. 



PH0C14G3/LIB 



MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 79DEC1 2 

. STACK LOAD, STORE AND MOVE (MOVE WITH SYSTEM SAVE AREA) 



16120 



326. 
327. 
328. 
329. 
330. 



00 2277L 



0022 77L 
002300L 
00230 IL 
002302L 
002303L 
002304L 
002305L 
002306L 
00230 7L 
0023 lOL 
0023 IIL 
00231 2L 
0023 13L 
002314L 
0023 15L 
0023 16L 
0023.1 7L 
002320L 
00232 1 L 
002322L 
002323L 
002324L 
002325L 
002326L 
00232 7L 



11001000 
01010001 
001101 11 
01010001 

I 1 00 I 1 1 1 
001 lOOOl 
00 110001 
00 1101 11 
00 1 1 00.0 1 
00 1101 II 
00 1 10001 
01010010 
00 1101 1 1 
00 1 10001 
00 1 10.110 
110001 00 
110001 II 
00 1101 II 
00 1 1 1 1 1 
00 I 1000 I 
00 I 101 11 
01010001 
00 1101 II 
010 11001 

I I I 1 1 1 



00100 1 II 
0000 1 1 11 
00000001 

00 1 110 11 
1001 0010 

1 1100101 

1 1 000 no 

00001000 

noil 1 II 

00101001 
1 1010 11 0"" 
00000010 
10000 110 
11010101 
10000 I Oi 
00 110001 
01101110 

0000 1100 
00001001 

noil 1 11 

00101001 
00000000 
00000001 

1 1 1 I 1 00 1 
01 I IIIOI 



• 
STKS« 

( 065) STKS 

-0.30 + C * 8.80 



(111 065 ) STKL 
-0.30 :f C • 9.20 



2.80 
2.80 
2.80 
2.80 



(022 065) 

(062 065) 

(174 065) 

(176 065) 



BRA 
LDPI 

BRC 

DLRX 

LDPP 
DADDP 



SYSM 
SYSM 
SYSM 
SYSM 



STKL,.F@,IZ 
LIMP,IMPL 

POPS TO 

HL2MR»,IIMP 



SAVE STACK CONTENTS 
(HL+1 I HL) <- (SP+1 I SP) 
HL <- HL -+ 2 ; SP <- SP * 2 
C <- C - 1 ; UNTIL = .0 (16) 

LOAD STACK CONTENTS 
(SP-I I SP-2) <- (HL-I I HL) 
HL <- HL - 2; SP <- SP-2 
C <- C - U UNTIL =0 (16) 

TO XA, MOVE SYSTEM SAVE AREA 

TO BC 

TO DE (SWAP WITH REG PAIR) 

TO HL 

SP-1 I SP <-> RP 

LOAD THE STACK (OR MOVE IT) 
.POINT TO HIDDEN REGISTERS 

GET THE TOP STACK ENTRY (M. POIN/E^f ^ 

POINT TO MEMORY AND CORRECT IMP 







MDW,IMPI STORE THE LSB 

UR0*UR,URI*UR,2 UPDATE THE HL POINTER (POPST DOES CO 



MWAIT 


,MEMPF$ 


STB 


I MAR ,01 MP 


LDPP 


MDW,IMPI 


LDPI 


LIMP,0 


BRAX 


RINI6 



STORE THE MSB 

RESET IMP FOR STKS OP-CODE 
DO REPEATED INSTRUCTION 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 



( 
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PH0C14G3/LIB 


MICRO- PROCESSOR EMULATION SUPPORT CODE - HJS - 79DEC12 16i20 












. STACK 


LOAD, STORE AND MOVE 


(MOVE 


WITH SYSTEM SAVE AREA) 




331. 








• 














332. 


002330L 






STKL 














333. 










(111 065) 


STKL 






LOAD STACK CONTENTS 


( 


334. 








*. -0.3.0 


+ C * 9.20 








iSP-l 1 SP-2) <- (HL-I 1 HL) 




335. 


















HL <- HL - 2; SP <- SP-2 




336. 


















C <- C - 1» UNTIL = (16) 


I 


337. 






















338. 








. 2.80 


(062 065) 


SYSM 






TO BC, MOVE SYSTEM SAVE AREA 




339. 








. 2.80 


( 1 74 065 ) 


SYSM 






TO DE 


i 


340. 








. 2.80 


(176 065) 


SYSM 






TO HL (SWAP WITH REGISTER PAIR) 




341. 








. 2.80 


(022 065) 


SYSM 






TO XA 




342. 


















SP-1 1 SP <-> RP 


( 


343. 






















344. 


002330L 


11011010 


11111111 




BRA 


SYSM,Fe,IO 






DO SYS AREA SWAP! 


• 


345. 


002331 L 
002332L 
002 333L 


00 110001 
00 110001 
00 1 1 1 1 1 


11100101 
1 1000110 
010001 11 




DLRX 


HL2MR,,SMR 








{ 


346. 


002334L 
002 335L 


01010001 
00 110 1 11 


00001 no 

00000001 




LDPI 


LIMP,IMPH 






POINT TO HIDDEN SAVE MSB 




347. 


002336L 


000101 11 


10 110010 




CCLR 










( 


348. 


002 33 7L 
002340L 
00234 IL 


00 11 000 1 

01 010 100 
001101 11 


11010110 
00000010 
10000 110 




.OOP IP 


URO+URL,SB 


,2, 


URI 


+URL DECREMENT L 


i 


349. 


002342L 
002343L 


11000100 
1 10001 11 


000 1 1101 
00010 110 




MWAIT 


♦STKLPF 






IF ERROR BE SURE TO DECR. H 




350. 


002344L 


00 1101 11 


00001 101 




STB 


DMAR 








\ 


.351. 


, 002345L 
002346L 


00 1 10001 
00 1101 11 


00 110 110 
10001 1 11 




LDPP 


IMPO,MDR 






GET MSB AND POINT FOR LSB 




352. 


002347L 
002350L 


00 110 111 
00 1 I 1 1 1 


01000 1 11 
00001000 




STB 


SMR,IIMP 








{ 


353. 


00235 IL 
002352L 
002 353 L 


00 110001 
01010100 

001 101 11 


11010101 
00000000 
10000101 


S fKLPF 


DOPIP 


URO+URH,SB 


»o, 


URI 


+URH DECREMENT H 


( 


354. 


002354L 
002355L 


110001 00 
110001 11 


000100 11 

Olio 1 no 




MWAIT 


»M£MPF$ 








( 


3 55. 


002356L 
002357L 


00 110001 
00 1 1 1 1 1 


00110 110 
1 000 i 1 1 1 




LDPP 


IMPO,MDR 






GET LSB DATA 




356. 


002360L 
00236 IL 


OlOlOOOl 
11001111 


00001101 
11 1 00 1 1 




BRC 


PSHSTO 






PUT IT ON THE STACK 


( 


357. 


002362L 
002363L 


01010001 
001101 11 


00000001 
00000001 




LDPI 


LIMP,1 






SET IMPLICIT ODD* 




358. 


002364L 


110001 00 


ooooion 




Wx 


»M£MPF$ 








( 




002365L 


1 1 000 1 1 1 


01101 no 




A'/V/^^ 










359. 


002366L 
002367L 


00110001 
001101 11 


1 1 1 1 1 00 
00000100 




iDPP 


MOD W, PS W I 






RESTORE STATE HERE. BEFORE, REPEAT 


( 


360. 


002370L 


1 0. 1 1 00 1 


1 1 1 11 00 1 




.^RA)(J 


RIN16 






. AND REPEAT IF NEEDED 


( 
( 




002371L 


1 1 00 MM 


on 1 1101 













( 
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PH0C14G3/LIB 



MICRO-PROCESS OH EMULATION- SUPPORT CODE - HJS - 79DECi2 

. STACK LOAD, STORE AND MOVE (MOVE WITH SYSTEM SAVE AREA) 



16»20 



361. 








• 


362. 


002372L 






SYSRETOi 


363. 


>0023/2L 


01011001 


11111111 






>002373L 


1 1 00 1 1 1 1 


1 1 1 1 1 1 11 




364. 








• 


365. 


0023 74L 


11111111 


1 1 1 1 1 1 11 






0023 75L 


111 11111 


1 1 11 1 1 11 






002376L 


1 1 1 1 1 1 1 1 


1 1 1 1 1 1 n 






0023 77L 


1 1 1 1 1 1 1 1 


1 1 11 1 1 11 





BRAX 



OFF PAGE JUMP FOR SYSRETURN CODE 



SYS RET 1 



FABPi^GE PRODL 






J 



s ^ 



6H^'^ 






//? 



DATAPOINT CONFIDKNTIAL INFOHMATION - SEE PAGE 1 



PAGE I 7 



366. 
367. 
368. 
369. 
370. 
371 . 
372. 
373. 
374. 
37t>. 
376. 
377. 
3/8. 
3 79. 
380. 
381 . 
382. 

383. 
384. 

385. 

386. 

387. 
388. 



389. 
390. 
391 . 



PH0C14G3/LIB 



MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 79DEC12 
. STACK LOAD, STORE AND MOVE (MOVE WITH SYSTEM SAVE AREA) 



16*20 



002400L 



002400L 
00240 IL 
002402L 
002403L 
002404L 
002405L 
002406L 
002407L 
0024 lOL 
0024 IIL 
00,24 12L 
0024 13L 
00241 4L 
0024 1 5L 
0024 1 6L 
0024 I 7L 
002420L 



00 110001 
01 000101 
IIOJOOIO 
00 1 1 000 1 
01010101 
01010011 
00 1101 11 
00 110 1 11 
00 110001 
00 1 10001 

00 1101 11 

001 101 11 
00 110001 
00 1101 11 
00 110001 
00 1 1 00>0 I 
11001 1 11 



1101 1100 
00000100 
1 1100000 
1101 1 1 11 
11111110 
01000000 
11000000 
00001001 
11101111 
11011010 
10001 1 II 
00001000 
11011011 
10001 1 11 
100010 11 
10101010 
1 1 111010 



+ 

SYSM 

2.80 

2.80 

2.80 

2.80 



(022 065) 

(062 065) 

(174 065) 

( 1 .76 065 ) 



SYSM 
SYSM 
SYSM 
SYSM 



XA 
BC 
DE 
HL 



TSTIP 



,SrtUSER,PSWI 



BRA 
D-OTIP 


IVI0L2,FZ 
,ND,-2»IMPI 


OOP I 


MAROL»OR,0100 


STB 
LDX 
LDPP 


DIMP 

IM2MRH 

IMPO»SPIH,IIMP 


LDPP 


IMPO,SPIL 


DLDX 


MR2SP 


BRA 


FETCH 



MOVE SYSTEM AREA 

(SWAP POINTER WITH REGISTER PAIR) 

SP-I 1 SP <-> RP 

<8-MSB> <X1 PPPPPO> 

WHERE* 8-MSB IS CORRECT MSB 

X IS 128 BYTE BOUNDARY 
PPPPP IS STACK POINTER 
1 IS FORCED ONE AND 
IS FORCED ZERO FOR 

CORRECT OPERATION 

NOT ALLOWED IF IN USER MODE 

LOW BIT MUST BE OFF 
BIT 6 MUST BE ON 



SAVE. NEW REG PAIR 
MOVE STACK TO REG PAIR 



MOVE SAVED NEW STACK POINTER 



DATAPOINT CONFIDHNTIAL INFORMATION - SEH PAGE I 



PAGE Ic 


i PH0C14G3/L 


[B 


MICH0-PR0( 


LESSOR EMI 


JLATION SUPPO 










. IMPLICIT REGISTER SELECTION 


394. 








* 






395. 


00242 IL 






SIRO* 






396. 








. 2.10 


[ 022) 


XA 


397, 














398. 


00242 IL 


00 1 1 1 1 t 


010001 11 




STB 


SMR 


399. 


002422L 


1 1 1 1 000 


1 1100000 




BRA 


IVI0L2,Fe,IZ 


400. 


002423L 
002424L 


OlOlOOOl 
00 110 1 11 


00010000 
00000001 




LDPI 


LIMP, IMPS 


401. 


002425L 
002426L 


00 110001 
00 1 1 OOX) I 


10001001 
10101 000 




DLDX 


MR2PC 


402. 


002427L 


1 1 00 1 1 1 1 


11110000 




BRA 


FETLIMP 


403. 








* 






404. 


002430L 






SIRX: 






405. 








. 2.10 ( 


111) 


B 


406. 










[ 062) 


C 


407. 










113) 


D 


408. 










[ 174) 


E 


409. 










115) 


H 


410. 










C 1 76 ) 


L 


411. 










[ 117) 


X 


412. 














41 3 . 


002430L 


00 110 1 11 


01000 111 




STB 


SMR 


414. 


00243 IL 


110 11 000 


1 1100000 




BRA 


IVI0L2»F@,IZ 


415. 


002432L 
00 24 33 L 


01010101 
00 1 1 1 1 1 


00000 1 1 1 
00000001 




OOP I 


LIMP,ND,7 


416. 


002434L 
002435L 


00 1 1 000 1 
00 110001 


10001001 
10101000 




DLDX 


MR2PC 


417. 


002436L 


1 1 00 1 1 1 1 


1 1 110000 




BRA 


FETLIMP 


418. 








* 






419. 


>002437L 
>002440L 


1 1 1 00 1 
11 00 1 1 1 1 


11111111 
1 1 1 1 1 1 II 


IVI0L2 


BRAX 


IVIOL^ 



79DEC12 16x20 



SELECT XA REGISTER PAIR 

START TO GET THE OP-CODE 

MULTIPLE IMPLICITS IN A ROrt IS ERROR 



SELECT B OR IMP ODD 

SELECT C OR BC OR IMP EVEN 

SELECT D 

SELECT E OR DE 

SELECT H 

SELECT L OR HL 

SELECT X 

START TO GET REAL OP-CODE 

MULTIPLE IMPLICITS IN A ROW IS ERROR 



( 
( 
( 
( 
( 
( 
( 
( 
< 
( 
( 
( 
( 
( 
( 
( 
( 
( 

c 
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422. 
423. 
424. 
42b. 
426. 
427. 
428. 
429. 
430. 
431 . 
432. 
433. 
434. 
435. 

436. 
437. 
438. 
439. 
440. 
441. 

442. 
443. 
444. 
445. 
446. 
447. 
448. 
449. 



450. 
451 . 

452. 
453. 



454.. 

455. 

456. 



PH0C14G3/LIB 



002441L 




MICPO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 
. JUMP CODES NON & CONDITIONAL & NO-OP & EI TYPES 



ICO) JCC.LSB.MSB 
(0.85 NOT TAKEN) 

100) JFC.LSB.MSB 

110) JFZ.LSB.MSB 

120) JFS.LSB.MSB 

130) JFP.LSB.MSB 

140) JTC.LS8.MSB 

J 50) JfZ.LS8.MSB 

160) JTS.LSB.MSB 

170) JTP.LSB.MSB 



79DEC12 16*20 



CONDITIONAL 


JUMP 


PC <- 


NN 




FALSE 


CARRY 




FALSE 


ZERO ( 


.NE.) 


FALSE 


SIGN ( 


.GE.) 


FALSE 


PAR I TV 


' (EVEN) 


TRUE 


CARRY 




TRUE 


ZERO .( . 


EQ.) 


TRUE 


SIGN (. 


LT. ) 


TRUE 


PARITY 


(ODD) 



002441 L 
00 2 442 L 
002443L 

002444L 



002444L 
002445L 
002446L 

002447L 



002447L 
002450L 
002451 L 
002452L 
002453L 
002454L 
002455L 
002456L 
002457L 
0024.60L 
002461 L 
002462L 
002463L 
002464L 
002465L 
002466L 



00 1 10001 
01 000101 
11010010 



00 1101 II 

001 101 11 
1 1 00 I 1 1 1 



00 1101 II 

11001 no 

11010100 

1 1 000 I 1 1 

00 not II 

00 110001 

onoi I n 

00 11 1 11 
1 1 00 I I 1 
11010100 
11 0001 11 
00 1 10001 
00 1101 11 
01 1 10001 

00 1101 II 

1 I 00 1 1 11 



00 11 000 I 
00000001 

lion 000 



0000 1100 
0000 1 1 00 

1 I 1101 11 



010001 11 

1 i 1 II 1 1 1 

IIOIOIIO 
01101 I 11 
00001100 

00 110 110 

1 I 110001 
01000 1 11 

II 1 1 1 1 11 

1100 1 1 11 

01101 111 

00 1 1 n 

1 1100000 

I 1 110001 

I 1000000 

.1 I 1101 11 



TSTIP .STUSCF, STATUS 

BRA JUMPvFZ 



* 

NOJ» 
. 0.50 



( 



Bf6^J 



STB 
BRA 



045) NOJ.LSB.MSB 
IMAR,IMAR 



TEST CC 

YES, IT-'S MET, DO THE JUMP 

3 BYTE NO-OP 

ONLY 2 I MAR'S (THINK ABOUT IT) 



JUMP* 
. 2.85 



FETCHN „^ __ 



i 



104) JMP.LSB.MSB 



STB 
MWAIT 



STB 
LDRP 

STB 
MWAIT 



SMR 
N00P,MEMPF2 

I MAR 
TEMP 1 , MDR 

SMR 
N00P,MEMPF2 



UNCONDITIONAL JUMP 
PC <- NN 

GET THE LSB 



GET THE MSB 



LDPP MARCH, MDR 

LDPR MAR OL, TEMP 

BRA FETCHN 



GOT THE MSB 
AND SAVED LSB 
GO TO IT! 
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PH0C14G3/LIB 


MICHO-PHOCEiJSOH EMULATION SUPPO 












. LOALKS 


AND STORE'S 




459. 








* 


Hf^ 


^nf<, 




460. 


00246 7L 






LD6* 










461. 








. 1. 


95 


( 0D6) 


ID. VVV 


' 


462. 




















463. 














( 006) 


LA. VW 




464. 














( 016) 


LB. VVV 


( 


465. 














( 026) 


LC. VVV 




466. 














( 036) 


LD.VVV 




467. 














( 046) 


LE.VVV 


( 


468. 
469. 
470. 














( 056) 
( 066) 
( 076) 


LH.VVV 
LL.VVV 
LX.VVV 


( 


471. 


















472. 


002467L 


001101 11 


01000 1 11 






STB 


SMR 


( 


473. 


002470L 
00247 IL 
002472L 


11 00 1 1 10 
11010100 
110001 11 


1 1 1 1 1 1 11 

11000 110 
01101 1 11 






MrtAIT 


N00P,MEMPF2 




474. 


002473L 


00 1 1 1 1 1 


0000 1 1 00 






STB 


I MAR 




475. 


0024 74L 
0024 75L 
002476L 


00 110001 
001101 11 
00 11 1 1 1 


00110 no 

10001 101 
010001 11 






LDPP 


1350, MDR, SMR 




476. 


0024 77L 
002500L 


00 1 1 000 1 
00 11 0001 


10001001 
10101000 






DLDX 


MR2PC 




477. 
478. 
479. 


00250 I L 
0025Q2L 


1 1 00 1 1 1 1 


1 1 1 1 1 00 


LU7I 


^ BHA FETCHL 




480. 








. 1. 


75 


( 3D7) 


LRM 




48 1 . 








4 












482. 








, 


2. 


10 


(062 3D7) 


LRM 




483. 








4 


2. 


10 


( t 74 3D7 ) 


LRM 




484. 








4 


2. 


10 


(022 3D7) 


LRM 




485. 


















486. 


002502L 


lion 000 


10 111000 






BRA 


LD7I,F@,IZ 




487. 


0025 03L 
002504L 
002505L 


00 1 1 0001 
00 11 0001 
00 1 10 111 


1 1100101 
11000 110 
010001 11 






DLRX 


HL2MR.,,SMR 


{ 


488. 


002506L 


110 11111 


10 110011 






BRA 


LD7CMN 




489. 


002507L 
0025 1 OL 


00 1 1 00.0 1 
00 1 1 1 t 1 


U 001 1 11 
00001001 


LD7I 




DLDX 


IM2MR,DIMP 


( 




0025 IIL 


00 1 10001 


11101111 












490. 


00,251 2L 


11 00 1 no 


11111111 






OELAV 


1 




49J . 


002513L 


00 1 1 1 1 1 


01000 1 11 






STB 


SMR 


( 


492. 


0025 14L 


n 00 1 1 1 


1 1 11 It It 


LD7CMN 


MWAIT 


.NOOP,$-H 






0025 15L 


1101 01 00 


10 110010 














0025 I6L 


IIOIOI 11 


ion 0000 










( 


493. 


0025 1 7L 
002520L 


00 11 000 I 
00 1 1 1 1 1 


001 to no 

t 0001 tot 






LDPP 


1350, MDR 




494. 


00252 1 L 


11 000 110 


11 1 11010 






BRA 


FETCH,F§,MP 


( 


495. 


002522L 


11001 ] 11 


OtlOt t 11 








BRA 


MEMPF2 



/9DEC12 16»20 



/^<2^ / 



( 
( 
( 



LOAD REG WITH IMMEDIATE VALUE 
D <- N 
LOAD A- REG 



LOAD X-REG rtlfH IMMEDIATE VALUE 



READ THE DATA BYTE 



GET THE DATA 

iMAKE THE COMMONEST INSTRUCTION FASTER) 
AND GO TO THE NEXT INSTRUCTION 



LOAD BYTE FROM MEMORY INTO REG 
D <- (HL) 
D <- (BC) 
D <-. ii}E) 
D <- (XA) 

SPECIFIED IMP? 

NO, THEN USE HL AS ADDRESS 



POINT AND START MEMORY READ 



PUT IN STANDARD 200 NS DELAY FROM RtkD'{ 



GET THE DATA FIRST, THEN 

NO FAULT AFTER HEAD, THEN DONE 
ELSE, GO TO FAULT ROUTINE 
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496. 
497. 
498. 
499. 
bOO. 
501. 
502. 
503, 
504. 
505. 
506. 

507. 

508. 
509. 



510. 

511 . 
512. 
513. 
514. 
515. 
516. 
517. 

518. 



PH0C14G3/LIB 



MICHO-PriOCESSOH EMULATION SUPPORT CODE - HJS - 
. LOAD'S AND STORE'S 



79DEC12 16»20 



002523L 



002523L 110 11000 10100 110 

002524L 00 1 10001 1 1 000 1 1 

002525L 00 1 10001 1 1 1 00 I 1 

002526L 00 110001 11011110 

002527L 00 1101 11 00101001 

002530L 1 1 00 1 1 1 1 1 1 1 1 1 1 00 

002531 L 00 I 10001 1.1001 I II 

002532L 00 1 101 11 00001 001 

002533L 00 110001 11101111 

002534L 00 1 10001 11011110 

002535L 00 1101 11 00101001 

002536L 11001111 11111100 

0025 3 7L 



L/S« 
1.30 

1 .55 
1.55 
1.55 



L/SI 



* 

LDS« 
. 0.50 



002537L 00 110001 110 11110 
002540L 00 1101 11 10001101 
002541 L 11001 1 II 11110 111 



i 



37S ) LMR 



(062 37SJ 
(174 37S) 
(022 37S) 



BRA 
DLDX 



LDPP 

BRA 
DLDX 



LDPP 
BRA 



LMR 
LMR 
LMR 



L7SI,F@,IZ 
HL2MR 

MDrt,I02I 

FETCHW 
IM2MR,DIMP 



MDrt,IQ2I 
FETCHW 



( 3DS) LRR 

LDPP 1350,1021 
BRA FETCHN 

L. OS oof: 



LMT 



STORE A BYTE IN MEMORY 

(HL) <- S 

USE REG PAIR BC 

USE REG PAIR DE 

USE REG PAIR XA 

(RP) <- S 

ALMOST EXACTLY LIKE LD7 



WRITE REGISTER IN MEMORY 



LOAD SOURCE REGISTER INTO ANOTHER ^^Q 
D <- S 

SAVE SOURCE REGISTER IN DESTINATION 
AND DONE! 






/y y^^j 



^ 



r 
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PK0C14G3/LIB 



MICRO-PROCESSOH EMULATION SUPPORT COUE - HJS - 
. ARITHMETIC LOGICAL UNIT OPERATIONS 



790EC12 J6»20 



521. 
D22. 
b23. 
524. 
525. 
526. 
527. 
528. 
529. 
530. 
531. 
532. 
533. 
534. 
535. 
536. 
537. 
538. 
539. 
540. 
541 . 
542. 
543. 
544. 
545. 

546. 
547. 
548. 
549. 
550. 
551. 
552. 
553. 
554. 
555. 
556. 



557. 
558. 



559. 
560. 



002542L 



002542L 
002543L 
002544L 
002545L 
002546L 
002547L 
00 2 550 L 

002551L 



00255 IL 
002552L 
002553L 
002 554L 
002555L 
002556L 
002557L 
002560L 
00256.1 L 
002562L 
002563L 



00 no 1 1 1 

01101111 
I i 010 100 
110001 It 
00 1 10001 
00 1 1 1 1 1 
110 11111 



OMOJ I 11 
00 1 1 OOD 1 
00 110001 
00 1 10 1.11 

1 1 00 I 11 
11010100 
110001 11 
00 110001 
00 II 000 1 

001101 11 
00 110001 



/^/^/f 



010001 II 
1 I II 0010 
I 00 I I 1 1 
01101111 

00 1 10 1 10 
00001 100 

1 0001 000 



002564L 1IX)1I111 1 



11 It 00 10 
1 1100101 
I I 000 1 10 
010001 II 

1 1 11 1 1 11 

10010001 
01101 1 11 
I 100 I 001 
I 1101000 
0000 I 1 00 
00110 110 
0001000 






* 

AP4« 
2.75 

+ .45 



( 0P4) 

(IMP 0P4) 
IF 'AC-' OH 

( 004) 

(IMP 004) 

( 014) 

(IMP 014) 

( 024) 

(IMP 024) 

( 034) 

( IMP 034) 

( 044) 

( IMP 044) 

( 054) 

( IMP 054) 

( 064) 

(IMP 064) 

( 074) 

(IMP 074) 

STB 

LDRT 

MrtAIT 

LDTP 

STB 

BRA 



. OP . VVV 
OP.VVV 

'SB^ 
AD. VVV 
AD. VVV 
AC. VVV 
AC. VVV 
SU.VVV 
SU.VVV 
SB. VVV 
SB. VVV 
ND.VVV 
ND. VVV 
XR..VVV 
XR . VVV 
OR. VVV 
OH . VVV 
CP.VVV 
CP. VVV 

SMR 

TEMP2 

,MEMPF2 

MDR 
I MAR 
ALUOP 



AP7» 
. 3.45 



( 
(IMP 



2P7). 
2P7) 



0PM 
0PM 



+ .45 IF 'AC-' OH 'SB' 



LDRT 
DLRX 






^/>/f 



DLDX 



LDTP 
BRA 



TEMP2 
HL2MR,,SMR 



N«CrP,MEMPF2 



PC2MR,»IMAR 



MDR 
ALUOP 



ALUOP ON IMMEDIATE ^ 


/ALUE 


ALUOP IS OTHER THAN 


TO A-REG. 


R <- 


- B OP N 




ADD 


IMMEDIATE VALUE 


TO A-REG 


ADD 


IMMEDIATE VALUE 


TO IMP-REG 


ADD 


i\Vm CARRY I MM. 


TO A-REG 


ADD 


rtlTH CARRY I MM. 


TO IMP-REG 


SUB 


IMMEDIATE VALUE 


FROM A- REG 


SUB 


IMMEDIATE VALUE 


FROM IMP-REG 


SUB 


WITH CARRY I MM. 


FROM A- REG 


SUB 


WITH CARRY I MM. 


FROM IMP-REG 


AND 


IMMEDIATE VALUE 


TO A-REG 


AND 


IMMEDIATE VALUE 


TO IMP-REG 


XOR 


IMMEDIATE VALUE 


TO A-REG 


XOR 


IMMEDIATE VALUE 


TO IMP-REG 


I OR 


IMMEDIATE VALUE 


TO A-REG 


I OR 


IMMEDIATE VALUE 


TO IMP-REG 


SUB 


I MM. VALUE FROM 


A-REG TO SET FLAGS 


SUB 


I MM. VALUE FROM 


IMP-REG TO SET FLAG 



GET .FOLLO»VING IMMEDIATE DATA 
SAVE ALU OP-CODE 



THE DATA IS IN T 



ALUOP WITH MEMORY DATA 
DEST. OTHER THAN A-REG 
R <- R OP (HL) 

SAVE ALU OP-CODE 
GET THE DATA 



SO ALUOP CAN USE FETCriN RETURN 



THE DATA 

AND GO WORK rtlTH IT 









( 
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561 . 
562. 
563. 
564. 
565. 
566. 
567. 
568. 
569. 
570. 
571. 
572. 
573. 
574. 
575. 
576. 
577. 
578. 
579. 

580. 
581 . 
582. 
583. 
584. 
585. 
586. 



587. 
588. 
589. 
590. 
591 . 



592. 
593. 
594. 
595. 
596. 



597. 
598, 
599. 
600, 
601 , 



PK0C14G3/LIB 



MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. ARITHMETIC LOGICAL UNIT OPERATIONS 



79DEC12 16*20 



002565L 



002565L 
002566L 



0Q2567L 



002567L 
002570L 
002571 L 
002572L 
0025 73L 
002574L 
002575L 



011011 11 
00 1 1 000 1 



1 1 110010 
11011110 



011011 11 
01 110001 
OOOtOl 11 
01010101 
01010010 

1 1 1 1 I 1 

1 I 1 1 1 1 1 



1 1 110001 
I I 110010 
10010010 
000 1 1 1 00 
01100101 
10 110000 
00000000 



0025./6L 
0025 77L 
002600L 
,00260 I L 



002602L 
002603L 
002604L 
002605L 



002606L 
00260 7L 
0026 lOL 
0026 ML 



602. 
603, 



0026 12L 
0026 13L 
002614L 
002615L 



00 110001 

01 110100 
00 1101 11 
1 1 00 1 1 I 1 



00 1 1 000 1 

01 1 1 00 1 t 
00 1101 11 
11001 1 11 



00 11 0001 
01 110000 

00 1 1 1 I 1 

1 1 00 1 1 1 1 



00 110001 

01 110101 
001101 11 
1 1 00 1 1 1 1 



11011 1 11 
00 110001 
00000 110 
.11110 111 



110 11111 
10 110001 
01101111 
11110111 



noil 1 11 

10 1 10001 
01101 1 II 
I I 1101 II 



1101 1 I II 
10 I 10001 
01101111 
1 I 1101 11 



.+ 

APS* 
. I .65 



( 2PS ) OPR 

(IMP 2PS) OPR 
+ .45 IF 'AC OR 'SB' 



LDRT 
LDTP 
BRA 



TEMP2 

I02I 

ALUOP 



ALU OP rtlTH SOURCE REGISTER 
DEST. OTHER THAN A-REG 
R <- R OP S 

SAVE ALU OP-CODE 
SELECT SOURCE REG. 



ALUOP 

. 1.40 

. .+ .45 IF 'AC OR 'SB' 



LDRT 
LDTR 
SH I FT 
DOT I 
DORA 



TEMPI 
TEMP2 
SR,CC 
,ND,034 



SAVE SOURCE REG. 
GET OPCODE 

GET ALUOP IN BITS 4-2 
SELECT 3 BITS 



LINK,AC,ALUXQT,,CC OFFSET TO THE EXEC TABLE 

BRR LINK GO TO CORRECT ROUTINE 

THE TABLE STARTS HERE AND IS BACKWARDS 

( A7S) CP 2'S COMPLEMENT SUBTRACT TO SET FLAGS 

DQPRP LUF,SB,TEMPI,IMPI,CO 

BRA FETCHN 

( A6S) OR LOGICAL INCLUSIVE OR 

. DQPRP I MP F , OR , TEMP M MP I » CC 

BRA FETCHN 

( A5S) XR LOGICAL EXCLUSIVE OR 

.DOPRP IMPFO, XR, TEMPI ,IMPI,CC 

BRA FETCHN 

( A4S) ND LOGICAL AND 

.DOPRP IMPF0,ND,TEMP1,IMPI»CC 



BRA 



FETCHN 



( 
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604. 
605. 
606. 

607. 
608. 
609. 
610. 
611 . 
6J2. 



613. 
614. 

61i3. 

616. 
617. 

618. 
619. 
620. 
621. 
622. 
623. 



624. 



PH0C14G3/LIB 



0026 1 6L 00 1 10001 
0026 1 7L 01101111 
002620L 01 110010 
00262 IL 1 100 I 110 



002622L 
002623L 
002624L 
002625L 



00 11000 1 
01 110100 
00 1101 II 
1 1 OX) 1 1 1 1 



002626L 00 110001 
002627L 0110 11 II 
002630L 01 1 10010 
002631 L 1 100 I 110 



002632L 00 1 1 0001 
002633L 01 110010 
002634L 00 1101 II 
00263bL 11001 I 11 



00110101 
11 ilOOlO 
00110010 
I I 1 1 1 1 II 



lion 1 II 

I 1 110001 
OIIOI I II 
.] } 1101 II 



OOllOlOi 
I 1 110010 
00 I I 00 10 

1 1 1 1 1 1 11 



1101 I I II 
II 110001 
01101 1 II 
11110111 
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MIC^O-PHOCESSOR EMULATION SUPPORT CODE - HJS - 
. ARITHMETIC LOGICAL UNIT OPERATIONS 



( A3S) SB 

LDRP TEMP2 , UCFLG 



ALUXQT 



79DECI2 16»20 
2-'S COMPLEMENT SUBTRACT ^ITH CARRY 



DOTR 
NOQP 



,AC»TEMP2,,C0 



SET THE CARRY 



( A2S) SU 2'S COMPLEMENT SUBTRACT 

DO-PRP IMPFO,SB»TEMPMMPI 



BRA FETCHN 

( Al S ) AC 

LDRP TEMP2 , UCFLG 

DOTR »AC,TEMP2,,C0 
NOOP 



{ AOS) AD 

.DOPRP IMPFO,AC,TEMPI ,IMPI 



■ 2'S COMPLEMENT ADD rtlTH CARRY 

SET THE CARRY 

2'S COMPLEMENT ADD 



BRA 



FETCHN 
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627. 
628. 
629. 
630. 



631 . 

632. 
633. 
634. 
635. 
636. 
637. 
638. 
639. 
640. 
641 . 
642. 
643. 
644. 
645. 
646. 
647. 
648. 
649. 
650. 
651. 
652. 
653. 
654. 
655. 
656. 
65.7 . 
658. 
659. 
660. 
661 . 
662. 

663. 

664. 
665. 
666. 
667. 
668. 



669. 



PW0C14G3/LIB 



MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. SERVICE REQUEST FIRMWARE I/O CONTROL FUNCTIONS 



790EC.12 16*20 



002636L 

002636L 
002637L 
002640L 
00264 IL 
002642L 

002643L 



002643L 
002644L 

002645L 



002645L 
002646L 
002647L 
002650L 
00265 IL 
002652L 

002653L 

002.653L 
002654L 
002655L 
002656L 
002657L 
002660L 



002 66 I L 
002662L 
002663L 
002664L 



00 1 1 000 1 
OlOlOOIl 
00 1101 11 
11010100 
110001 11 



00 11000 
1101001 



OIOOOIOJ 
11 01 0010 
01000101 
1 1 0.1 00 1 
01000101 
11010010 



11010100 
1 1 000 1 1.1 
00 110001 
001101 11 
01000101 
II OOOOIO 



00 I 10001 
00 1 J 0001 
00 1101 II 
11001 1 11 



1 1 1 1 I 00 
001 00000 
10001100 

0101 1 no 

01101 1 11 



00 1 1 0000 
01 01 OJ 00 



00010000 
01001010 
00100000 
01 00 1 000 
01 000000 

0010 1 no 



1 1 I 00 
01101 1 11 

1 1 1 n 00 

00000100 
00100000 
11101011 



1 1101000 
11001001 
01000 1 II 
1 1 1 1 0000 



SRVRPT* 



REPEATED SERVICE REQUESTS 
DQPIP PSWO,OR,SWRPT,PSWI SET REPEAT FLAG 

MWAIT ,MEMPF2 



SRVNXTi 

. i-OLLOWlNG TIMING ASSUMED OR CORRECTED TILL THIS POINT REACHED 
(NOT INCLUDING OFF~PAGE ROUTINES) 

fSrrP FI,SRVREQ RELOAD SERVICE REQUEST i-LAGS 

BRA SRVRTW,TZ (SPEEDUP, REALLY NO MORE INTERRUPTS) 

* 

SRVDO* SERVICE LOOP - PRIORITY SEQUENCE 

+*+*+*+*+*.+*+*+*+***+*4-***i+*+***+*+*+*+*+*+*+*+*+jllr+*+*+ 

NOTICE »« ALL SERVICE. ROUTINES THAT USE THE MAR MUST. FIRST HAVE A 
MrtAIT ,$+1 SO THAT THE MEMORY BUS IS NOT OVERRUN. 
ALSO, THE MODE-WORD SWUSER MODE BIT MAY NEED TO BE TURNED OFF 
TO ALLOW ACCESS TO PROTECTED MEMORY 

NOTE* P.C. POINTS TO START OF INSTRUCTION BEING EXECUTED (REPEATED) 

OR TO INST. THAT WAS TO BE EXECUTED (FETCH) 

NOT INCLUDING. THE IMP-SPEC. 
+*+*+*+*+•+*+•+*+•+*+*+•+*+*+•+*+*+*+•+*+*+*+•+•+•+*+*+*+*+*+*+*•+*+* 



* 
SRVRTW* 



TSTIT 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 



MWAIT 

LDPP 

TSTIT 
BRA 

DLRX 

BRA 



,SCDSPNL 
DLDO , FZ 
, SCON MS 
OMDO,FZ 
,SCHUMS 
HUMDO,FZ 



,MEMPF2 
MODW.PSWI 

,SWRPT 
SRVID,FZ 

PC2MR,,SMR 

SRVEND 



0.50 
DISPLAY-KEYBOARD SERVICE 
.1.80 .(SCDON); 1.90 (SCLST) 
ONE MILLI-SECOND INT 
1.16 (DO NOTHING) 
HUNDRED MICRO-SEC INT 



2.85 (RE-FETCH)I 1.25 (R^^T-'D) 
FOR TRAILING MDW'S 

RESTORE CORRECT MODE, (IF CHANGED) 

REPEATED INSTRUCTION? 

YES, DO IT ONLY 

WARNING!. SOME REPEATED CODE IN FUTURE 

MAY NEED MAR TO MATCH THE PC 

NO, CODE AS AT FETCH WITHOUT SERVICE 



GO TO FETCH-EXECUTE 
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DATAPOINT CONFIDENTIAL. INFORMATION - SEE PAGE 1 

MICrtO-PHOCESSOri EMULATION, SUPPORT CODE - HJ3 - 
. SERVICE REQUEST FIRMWARE I/O CONTROL FUNCTIONS 



79DEC12 16*20 



670. 
671 . 

672. 
673. 
674. 
67t). 
676. 
677. 
678. 



679. 
680. 

681 . 
682, 

683. 
684. 
685. 
686. 
687, 
688, 
689, 
690, 
691, 



>00266bL 
>002666L 

002667L 



002667L 
002670L 
002671L 
002672L 
002673L 

0026 74L 

002675L 

>002676L 

0026 77L 

002 700L 

>00270IL 

>002702L 



0101 1001 
1 1 OX) I 1 I I 



1 1 II 1 I II 
I 1 1 I I 1 II 



* 

DLDO 



BRAX 



DL$DO 



DISPLAY - KEYBOARD 



00 I 10 
OlOIOOOt 

01 101 
OlOlOOOi 
OIIOI I 11 

010100 
10001 II 
I 1 1 OO 1 
00 1 1 000 
01 000101 
II 0000 
1 00 I I 1 I 



OOOOIOIO 
00100100 
I 1 1100 10 
1101 1 I 
0001 



^ n £>p 



5^8 

MP 

//fA 



ONE MILLISECOND INTERRUPT CONTROL 



MrtAIT 

BPGX 
TSTIP 




OMDO 

. J. 30 (TO SCDON), 1.40 (TO SCLST) 

. SHOULD BE LAST INTERRUPT IN CHAIN BECAUSE DOESN-'T RETURN AS OTHERS DO 
THRQUOH SRVRET (GOES OFF ON ITS OWN) 

STB COMF CLEAR FLAG 

DLDRI TEMP»SVONEMS LOAD INTERRUPT VECTOR ADDRESS 



, MEMPF2 

SCDON 
,SWRPT,PSWI 

SCDON, TZ 
SCLST 



($+1 OR SRV. RTN. FAULT GENERATES MEMPF) 
WAIT FOR UNUSED INST. FETCH TO COMPLETE 



WAS REPEATED INSTRUCTION? 

NO, THE P.C. CORRECT (IMP - UNKNOWN) 
YES, BACK UP P.C. TO IMP-SPEC. 



I-FETCH ENTRY PC POINTING TO NEXT INSTRUCTION TO EXECUTE SO CORRECT 
IMP IS ZERO BY WAY FETCH CODE WRITTEN 

NON-I~FETCH (REPEATED) PC POINTING TO INSTRUCTION BEING REPEATED 
IF IMP ZERO PC IS CORRECT, POINTING TO INST. TO CONTINUE 

IMP NON-ZERO MUST BACK UP PC TO RE-DO IMP SPEC CODE WHEN MACRO-RETURNS 
COULa SIMPLIFY, IF IMP-NON-ZERO MUST BACKUP BECAUSE IS IMP-SPEC REPEATED 






( 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 79DEC12 J 6* 20 

. NOISE-MAKER INTERFACE. BEEPS, CLICKS & MAKES OTHER FUNN^ NOISES 



694. 
69b. 
696. 
697. 
698. 
699. 
700. 
701. 
702. 
703 . 
704. 
705. 
706. 
707. 
708. 
709. 
710. 
711. 
712. 
713. 
714. 
71b. 
716. 
717. 
718. 
719. 
720. 
721. 
722. 

723. 
724. 
725. 
726. 

727. 
728. 
729. 
730. 
731. 
732. 
733. 
734. 
735. 
736. 
737. 



000203 
000253 
000310 
000316 
000360 

000340 
000177 

002703L 



002 703L 
002704L 
002705L 
002706L 
002707L 
002 710L 
00271 IL 
002 7 1 2L 
002713L 
0027 14L 
0027 15L 



00271 5L 
002716L 
00271 7L 
0-02 7 20L 



01010001 
01101111 
001 10001 
01000101 
11010010 

000 I 000 I 
II 000010 

on 10001 

000001 11 
1 loot 1 II 



01010001 
IIOIIOIO 
01010001 
1101 II II 



100000 I I 
1 1 1 10001 
1 I I 1 I 00 
00000100 
1 1100000 
IIOOI 101 
1 1 1101 11 
I I I 1 000 1 
I I 1 1 I 101 
1 I 1101 II 



1 I 110000 
00 1 1101 I 
lOIOIOII 
00 1 1 1 I 1 



.DEFINE 
TOGGLE 

FCN 



THE 
87 

B6,5 



CONTROL BITS FOR THE AUDIO CHANNEL 

HIGH OUTPUT (IF NOT DELAYING) 

1 LOW OUTPUT (ALWAYS) 

00 BEEP WITH LONG DELAY (NORMAL) 

01 BEEP WITH SHORT DELAY 

10 DELAYING 

11 CLICKING 
DONE B4 CONTINUE DOING OPERATION 

I STOP, THE END (IF B7 IS 1) 
COUNTER B3,2,l,0 COUNT AT A 60/50HZ RATE (BY DL$DO) 

. NOW, DEFINE THE CONTROL COMMANDS (INITIAL/FINAL VALUES) 



BPINIT 
BPSHRT 
DLYLNG 
DLYSRT 
CLKINI 

CLKLVL 
BYPLVL 
• 
BEEP* 



. 1. 15 i 

CLICKS 



EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 



B7+B4-I3 

B.7+B5+B4-5 

B7+B6+B4-8 

B7+B6+B4-2 

B7+B6+B5+B4-0 

0340 
1 77 



( 151 ) EX BEEP 
(IMP 151 ) EX BEEP 
DO IT), 0.85 (PREVIOUS 

LDTI BPINIT 

LDRT TEMP I 

TSTIP ,SWUSER,PSWI 



IN 



CLICK* 



BRA 
TSTRT 
BRA 
LDRR 

BRA 



IVI0L2,FZ 
F I , ACD 
FETCHN , FZ 
ACD, TEMPI 

FETCHN 



( 



153) EX CLICK 
(lEV 153) EX CLICK 
1.35 .(DO iT), 1.05 (PREVIOUS 
(lOD 151 ) CLICKR 



IN 



1.55 (DO IT), 
LDTI 
BRA 
LDTT 
BRA 



1.25 (PREVIOUS 
CLKINI 

CLICKS,F@,IO 
BPSHRT 
CLICKS 



IN 



STANDARD BEEP ENDS WITH B7+B4 
SHORT LENGTH ENDS WITH B7+B5*B4 
STANDARD DELAY ENDS WITH B7+B6+B4 
SHORT DELAY ENDS WITH B7+B6*B4 
NORMAL CLICK ENDS WITH B7+B6+B5+B4 

LEVEL THE CLICK USES ON THE D/A 
LEVEL THE BEEP USES ON THE D/A 



START AUDIBLE CHANNEL TF QUIET 
START AUDIBLE CHANNEL IF QUIET 
PROGRESS ) 

SETUP FOR BEEP OPERATION 

SAVE AWAY THE CONTROL BYTE 

IS IT LEGAL TO DO THE INSTRUCTION? 

NO, ERROR IT OUT 

ANY SOUNDS IN PROGRESS 

YES, SO DO NOTHING 

NO, SO IN IT TO DO THE NEW SOUND 



START AUDIBLE CHANNEL IF QUIET 

START AUDIBLE CHANNEL IF QUIET 
PROGRESS) 

SPECIAL NOISE IF QUIET 
PROGRESS) 

ASSUME NORMAL CLICK 

IT WAS! 

NO, WAS SPECIAL SHORT BEEP 



DATAPOINT CONFIDENTIAL, INFORMATION - SEE PAGE 1 
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738. 
739. 
740. 
741 . 
742. 
743. 
744. 
745. 
746. 
747. 
748. 
749. 
750. 
751. 
752. 
753. 
754. 
755. 
756. 
757. 
758. 
759 . 
760. 
761 . 
762. 
V63. 
764. 
765 . 
766. 
767. 
768. 
769. 
770. 
7/1. 

7/2. 
773. 
774. 
775. 
7.76. 
.777. 
7/8. 
779. 

780. 
781 . 
782. 
783. 

784. 
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MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 79DEC12 16*20 

. NOISE-MAKER INTERFACE. BEEPS, CLICKS & MAKES OTHER FUNNY NOISES 



002721L 
002721 L 
002 722L 
002723L 



002724L 



002724L 
002 725L 
002726L 
002 72 7L 
002730L 
002731L 
002732L 
U02733L 
002 734L 
002735L 
002 736L 
002737L 

002 740L 
00274 IL 
002 /42L 
002743L 
002744L 

002 /45L 
002 746L 
002 747 L 
002750L 
002 /51L 
002 752L 
002/53L 
002 754L 

002755L 
002756L 
002 757L 
002760L 



00 1101 11 
00010001 
11010011 



01010010 
11010001 
01000101 
11010011 
01000101 
11010010 
01 000101 

I 101 0010 
0101 000 1 

I I 1 1 1 1 1 
010.10001 
110 11111 

OlOtOOOI 
00000 1 II 
01010001 
001101 11 
11011111 

OIOOOIOI 
II 01 00 II 
OIOOOIOI 
1 1 01 00 11 
00000 1 11 
01010001 
00 1101 I I 

no 1 1 1 II 



00001011 
\0\ I 1101 
I 1 1 .1 00 



10000000 

000 11010 
00010000 

0001 1 110 
01 000000 
000 11111 
001 00000 
00100001 
1 1001000 

0001 1 no 
11001 no 

0001 I I 10 

00000000 

I 11 1 IIOI 
00000000 
001 01 010 
0101 1100 

OJ 000000 
00010010 
00100000 

000 1 1 no 

II II IIOI 
I 1100000 
00101010 
010 1 1100 



00000 111 I 111 1101 

OIOIOOOI 01111111 

00 110111 00101010 

IIOIII 11 0101 I 100 



* 
HUMDO 



STB 
LDTR 
BRA 
BRAX 



CHUF 
ACD,CC 
SRVNXT»TZ 
AC$DO 



HUNDRED-MICRO-SECOND 

CLEAR INTERRUPT 

IF ZERO 

THE CHANNEL IS OFF ( 1 

ELSE ON, SO DO IT 



INTERRUPT .(AUDIO) 



15) 



AC$DO« 

. 1.05~1.75 

. THE SPECIAL AUDIO CHANNEL, CONTROL IS DONE HERE 

.. OPERATION IS TO ALTERNATE THE TOGGLE fB7). 

. IF IT BECOMES SET (FC) OUTPUT LOW VALUE.. IF IT BECOMES CLEAR (TO 

. THEN OUTPUT HIGH VALUE IF BEEPING OR CLICKING, DELAY IS A LOW VALUE. 

. TEST FOR COMPLETION ( FC & B4 SET) AND WHEN DONE THE TIMING, SEE IF MORE 

. TO DO (THE DELAY). IF DELAY ALREADY DONE, THEN END. ELSE, LOAD UP THE 

. DELAY CONTROL BYTE TO DO IT. 

. NOTE: LOW ORDER BIT COUNTING IS DONE BY DLSDO ON EVERY BOTLINE (50 / 60 HZ) 



ACSHRT 



ACEND 
ACLOUT 



ACSI G 



ACHOUT 



DOTI ,AC,B7 

BRA ACSIG,TC 

TSTIT ,B4 

BRA ACLOUT, TZ 

TSTIT ,B6 

BRA ACEND, FZ 

TSTIT ,B5 

BRA ACSHRT, FZ 

LDTI DLYLNG 

BRA ACLOUT 

-LDTI DLYSRT 

BRA ACLOUT 

TCLR 

LDRT ACD 

LDPI LSPKR,0 

BRA SRVNXT 

TSTIT ,B6 

BRA ACHOUT, TZ 

TSTIT ,B5 

BRA ACLOUT, TZ 

LDRT ACD 

LDPI LSPKR»CLKLVL 

BRA SRVNXT 

LDRT ACD 

LDPI LSPKR,BYPLVL 

BRA SRVNXT 



TOGGLE THE TOGGLE BIT 

WAS 1 (TO 0). DO RISING EDGE BEEP & CLICK 

DO FALLING- EDGE (OR LOW LEVEL) 
WAS (TO I), NOT DONE, LOW OUTPUT 
FINISHED BEEPING? 
NO, FINISHED CLICK OR DELAY FOR GOOD 



FINISHED LONG BEEP, DO LONG DELAY 
FINISHED SHORT BEEP, DO SHORT DELAY 



FINISHED ALL OPERATIONS (ALLOW NEXT) 
SAVE THE NEW CONTROL BYTE 
OUTPUT LOW TO THE SPEAKER 



ARE WE BEEPING? 

YES, PUT OUT ITS LEVEL 

ARE WE CLICKING? 

NO, DELAY OUTPUTS LOW LEV.EL 

SAVE THE NEW CONTROL BYTE 

OUTPUT CLICK LEVEL 



SAVE THE NEW CONTROL BYTE 
OUTPUT BEEP LEVEL 
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00276 IL 
002762L 
002763L 
002764L 
002765L 
002766L 
002767L 
002 770L 
002 77 1 L 
002 772L 
002773L 
002 774L 
00277bL 
002 776L 
002 777L 



DATAPOINT CONFIDhNTIAL INFORMATION - SEE PAGE I 

MICHO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 79DECI2 16*20 

. NOISE-MAKEH INTERFACE. BEEPS, CLICKS & MAKES OTHfiR FUNNY NOISES 



TABPAGE PRODL 



( 

( 
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789. 
790. 
791. 
792. 
793. 
794. 
795. 
796. 
797. 
798. 
799. 
800. 
80J. 
802. 
803. 
804. 
80b. 
806. 
807. 
808. 
809. 
810. 
811. 
812. 
813. 
814. 



815. 

816. 

817. 
818. 

819. 

820, 



821, 
822, 



823. 



PrtOC14G3/LIB 



003000L 



003000L 
003001 L 

003002L 
003003L 
003004L 
003005L 
003006L 
003007L 
0030 lOL 
0030 1.1 L 
0030 12L 
003013L 
0030 14L 
0030 15L 
003016L 
0030 17L 
003020L 
00302 IL 
003022L 
0030.23L 
003024L 
003025L 
003026L 
003027L 
003030L 



100 
100 



001 
010 



00 110001 
00 110001 
001101.11 
00 1 10001 
01101 1 11 
11000100 
IIOJOI 11 
00 1101 11 
00 110001 
00 110001 
00 110001 

00 110001 
OOUOOOl 

01 I 10010 
00 1 1 1 1 1 
01101111 
00110001 
01010100 
00 1101 II 
00 110001 
01010100 
00 1 1 1 1 1 
1 1 00 1 1 1 1 



NOlOlOO 
1 1100 110 

1 1100101 
11000 110 
010001 II 
1101 0000 
I I 110001 
I 1 1 1 1 000 
OOOIOJOO 
00001101 
10000110 
10100101 
1 1 1 000 1 1 
11000100 
00 110 110 
00 1 1 000 1 
00 1 1 00 1 
101.10001 
10010000 
00000001 
1-0000100 
10 110000 
00000000 
100000 11 
10111111 



UATAFOINT CONFIUENTIAL INFORMATION - SEE PAGE 1 

MICHO-PROCESSOrt EMULATION. SUPPORT CODE - HJS - 
. BLOCK TRANSFER AND CONVERT 



79l)ECJ2 16*20 



* 

BTx 



( 021) BT BLOCK TRANSFER 

-0.30 + N • 5.30 - N • 0.15 / ODDSTEP + 0.10 WHEN TCFZ / STEP - 0.50 IF MATCH 

. (DE) <- T <- A + (HL) 

DE <~ DE + 1? HL <- HL * 1 

STOP IF T = -i3; C <- C - 1; UNTIL = 

(111 021) BTR BLOCK TRANSFER REVERSE 

-0.30 + N * 5.60 - N * 0.15 / ODDSTEP +0.10 WHEN TCFZ / STEP - 0.50 IF MATCH 

. (DE) <- T <- A + (HL) 

DE <- DE - l; HL <- HL - 1 

STOP IF T = -B.; € <- C - II UNTIL = 

(062 021) BCV BLOCK CONVERT 

-0.30 + N • 6.85 - N * 0.15 / ODDSTEP + 0.10 WHEN TCFZ / STEP - 0.50 IF MATCH 

(DE) <- T <- A <- (HL* >(DE)) 
DE <- DE + I 

STOP IF T = -ai c <- c - 1 ; until = o 

NOTE* NONE OF THESE CHANGE THE CONDITI-ON FLAGS 



• 

BTR 



BRA 
BRA 

DLRX 



LDRP 

MWAIT 

STB 
DLDX 

DLRX 

DO.PRP 



BTX,Te,IZ 
BTV,F@»IO 

HL2MR,,SMR 



BT (021) 

BTR (062 021) 

BTR (111 021 ) 



TEMPI ♦URI+URA LOAD UP THE A-REG OFFSET 

, MEMPF3 

DMAR 

MR2HL DECREMENT HL FOR BTR 

DE2MR 

MDW, AC, TEMPI ,MDR»CO GET RESULTANT DATA 



LDRT TEMP 1, , CC 
DDECP URO+UDE,MARI 



STORE DATA IN, (DE) 
BACKUP DE FOR BTR 



BRA 



BTEND 



( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 

c 

( 
(. 
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824. 
825. 



826. 
827. 
828. 

829. 

830. 
831 . 
832. 
833. 
834. 
835. 
836. 

837. 
838. 
839. 



840. 

841 , 

842. 
843, 

844. 

845. 



846. 
847. 
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MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. BLOCK TRANSFER AND CONVERT 



79DEC12 16*20 



00303 IL 
003032L 
003033L 
003034L 
003035L 
003036L 
00a037L 
003040L 
00304JL 
003042L 
003043L 
003044L 
003045L 
003046L 
003047L 
003050L 
00305 IL 
003052L 

003053L 
0030ML 
0030 55L 
003056L 
003057L 
003060L 
003061L 
003062L 
003063L 
003064L 
003065L 
003066L 
003067L 
003070L 
0030/1 L 
003072L 
0030 73L 
0030 74L 
0030 75L 
0030 76L 
0030 77L 



00 I 1000 I 
00 110001 
00 1 1 1 1 1 
000101 11 
00 1 I 0001 
11000100 
llOiOl 11 
00110010 
00 110 1 II 
00 1101 1 J 
00 1 1 000 1 
00 110110 
OIOIOOOI 
00 1101 11 

1 1 0. I I n 

11000100 
110101 11 
11001 1 11 

00 110001 
00 1.100.01 
00 1 1 1 1 1 
00 1 10001 
01 101 1 II 
11000100 
1 1 1 1 1 1 
00110 1 II 
00 110001 
00 110001 
00 110001 
00 I I 0001 

00 110001 

01 I I 0010 

00 not II 

01 101 I II 
00 110001 
00010 I 10 
00 I 101 11 
00 110001 
00 1 1 1 1 



.1 I 1000 I I 
I I 000 1 00 
01 0001 11 
1 1 1 00 I 
I 1 1 I I 
1 I J 00001 
00010100 

00110 no 
n 000000 

10000000 
.11010101 
1 1100000 
00000000 
01000 1 11 
1 IIJOOOI 
1 10101 II 
00010100 
I I 001 010 

i.nooioi 
1 1000 no 
otoooi n 

1101 0000 
1 1 11000 I 
I.IOOl 111 
00010100 
0000 1 1 00 

1 0000 no 

10100101 
11000100 
1 1.100011 
00110 110 

00 110001 
00101001 
1 1 110001 
10010000 

01 110010 
I 0000 I 00 

ion 0000 

10000011 



* 

BTV 



* 

BTX 



BTCVT 



DLRX 


DE2MR,»SMR 


CCLR 
LDTP 
MWAIT 


URI+URL 
,MEMPF3 


DOPP 


MAROL,AC,MDR 


LDPT 

LDTP 

DOP 

TCLR 

STB 

LDRT 

MWAIT 


URO+URA 
URI+URH 
MAROH,rr 

SMR 
TEMP 1 
,MEMPF3 


BRA 


BTCVT 


DLRX 


HL2MR,,SMR 


LDRP 


TEMPI ,URI+URA 


MWAIT 


,MEMPF3 


STB 
DLDX 


I MAR 
MR2HL 


DLDX 


DE2MR 


DO-PRP 


MDW, AC, TEMPI , 


LDRT 
DADDP 


TEMPI 
URO.+UDE,MARI 



BCV (062 021 ) 



ADD DATA AT DE TO TABLE POINTER IN HL 



A <- MAR <- L-+ (DE) 

STORE IN. A SO CAN FIHO STOP POINT 
ADD IN CARRY ALSO 

NO A-REG OFFSETS 

INDIRECT THROUGH THIS FOR TABLE ENTRY 



GET DATA AT HL TO BE MOVED 

SAVE THE A-REG OFFSET (ZERO FOR BCV) 

INCREMENT FOR FOR BT 

-POINT TO WHERE TO STORE RESULT 



I INCREMENT DE FOR BT & BCV 



( 



DATAPOINT CONFIDENTIAL INFOHMATION - SEE PAGE 1 

PAGE 32 Pf^0C14G3/LIB M I CHO- PROCESS OH EMULATION. SUPPORT CODE - HJS - 79DECJ 2 J6»20 

. BLOCK TRANSFER AND CONVERT 

848 . * 

849. . BT - 3.25, BTR - 3.55, BCV - 4.80 (TO HERE) 
850. 

851. 003I00L OOnOOOl 11010001 BTEND TSTRP AC,TEMP1 ,URI+URB ,C0 AT THE ENDPOINT? 
003101L 01 110010 00000001 

852. 003102L 11000000 lOlllOlO BRA RIN256,FC NO, WANT CARRY TRUE & ZERO TRUE 

853. 0031 03L 110000 11 01110111 BRA RIND,TZ YES, END NOW! 

854. . BRA RIN256 NO! 

855. . NO, REPEAT 256 TIMES (OR LESS) 

856. 0031O4L OOOIOIII 10110010 CCLR ONLY CARRY SETRIN256 CASE 
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859. 








860. 


003J05L 






861 . 








862. 








863. 








864. 








865. 








866. 








867. 


.003105L 


00 110001 


11010010 




003106L 


OIOJOIOO 


00000001 




003107L 


00 110 1 11 


10000010 


868. 


003110L 


11 0000 11 


0111011) 


869. 


003 1 ML 


01 000101 


00000001 


870. 


003 112L 


1)000010 


10 11 0010 


87) . 








872. 








873. 


Q03I13L 






8 74. 








875. 








876. 








8 77. 








. 878. 








8 79. 


003113L 


00110001 


00 110000 


880. 


003 114L 


11 000010 


10)0) no 


881. 


003115L 


11000100 


10 1100)0 




003I16L 


110101 11 


000)0)00 


882. 


003 1 1 7L 


00 1 11001 


00)) 0)00 




003120L 


1010 1111 


001)001 ) 


883. 








884. 


003121L 


1 1 1 00 1 


) 1 1 1)0)0 




003122L 


1101)111 


0))0000) 



UATAFOINT CONFIDENTIAL INFORMATION - SEE PAGE ) 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 79DEC.) 2 16120 
. REPEATED INSTRUCTIONS, REPEAT CONTROL SECTION 

* 

RIN256* 

. ODD - ).45, RPT - 1.60, SRV - ) .35, END- ) .30 

WARNING, CARRY MUST BE CLEAR ON ENTRY 

BLOCK REPEATED INSTRUCTIONS (THOSE THAT COUNT C THROUGH 256 MAX STEPS 

DO NOT CHANGE FLAGS) 



( 

( 



DOPIP 



URO+URC,SB,),URI+URC IF ZERO, FINISHED 



BRA 


RIND,TZ 


TSTIT 


,1 


BRA 


HINDO,FZ 



DO THEM IN PAIRS SO CAN'T INTERRUPT 

DURING DOUBLE BYTE MOVE 

iCAN USE BT IN DISPLAY POINTER MOVES! 



* 

RINST* 

. SRV - 0.65, RPT - 0.90 



LOOP THROUGH REPEATED INSTRUCTIONS, SET THE REPEAT MODE AND DO 
SERVICE REQUEST IF NEEDED ELSE RE-EXECUTE THE INSTRUCTION. 



RINDO 



RINRPT 



TSTPT 

BRA 

MWAIT 

BRPX 



BRAX 



FI,SRVREQ 
RINRPT, FZ 
,MEMPF3 

IDCOD 



SRVRPT 



DO SERVICE IF NEEDED 



GO DO OPCODE AGAIN 



( 



DATAPOINT CONFIDHNTIAL- INFORMATION - SEE PAGE 1 
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PR0C14G3/LIB 



MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. BLOCK COMPARE 



79D£C12 16*20 



887. 
888. 
889. 
890. 
891. 
892. 
893. 
894. 
895. 
896. 
897. 
898. 
899. 
900. 
901 . 
902. 
903. 
904.. 
905. 



906. 



Q03123L 



907. 
908. 
909. 

910. 



911. 
912. 

913. 

9-14. 
91b. 



003123L 
U03124L 
00J125L 
003126L 
003127L 
003130L 
003131L 
003132L 
003133L 
003134L 
00313bL 
003136L 
0031 37L 
003140L 
003141L 
003142L 
003143L 
003144L 
003145L 
0031 46 L 
0031 4 7L 
003150L 
0031 51 L 
003152L 
003153L 
003 1 54L 
003155L 
003156L 



I I 001000 
00 110001 
00 110001 
001101.11 
00 110001 
000101 10 
00 110 I 11 
00 110001 
00 110 110 

I I 000 100 
110101 11 
00110001 
1 1 II 1 J 
00110001 

ooiiooai 
00 110 1 n 

00 110001 
000101.10 
OOllOl 11 
00 110001 
00 110 110 
01 110001 
1 1 000 1 00 
11010111 
00 110100 

00 1 i 1 1 1 

11 0000 1 1 

noon 11 



10010000 
1 IIUOOII 
I 1000100 
010001 11 
1001 0000 
01 110010 
10000100 
10 110000 
100000 1 I 
101000 11 
00010100 

00 110 110 

1 1 IIOOOl 

1 n 00101 

11000 110 
01000111 
10010000 
0.1 1 1 0010 
10000 I 10 
10 110000 
10000101 
10 11 0001 
1 00 1 1 1 
00010100 
00110 110 
00000110 
10 111010 
01110111 



* 

BCPi 

( 041) BCP BLOCK COMPARE 

-0.30 .+ N • 5.25 - 0.15 * N / ODDSTEP - 0.5 IF MATCH 

(HL) - (DE).I HL <- HL + 11 DE <- DE + 1 
STOP IF Tit C <- C - l; CONTINUE UNTIL = 



(111 04 1) DF AC 
-0.30 + C * 7.45 



(062 041) DFSB 
-0.30 + C * 7.65 



BRA DFOP.FQ.IZ 
DLRX DE2MR,,SMR 



DADDP URO*UDE,MARI 



DECIMAL FIELD ADD 

(DE) <- B -.OR. iDE) .DAD. (HL) + CRV 

DE <- DE- U HL <- HL - J 

C <- C - 1 ; UNTIL =0 (16) 

DECIMAL FIELD SUBTRACT 

(DE) <- B .OR. (DE) .DSB. (HL) - CRY 

DE <- DE - 1.1 HL <- HL - 1 

C <- C - II UNTIL =M ( 16) 

GO TO DECIMAL STUFF 



GET DATA AND UPDATE DE 



MWAIT 


,MEMPF3 


LDRP 


TEMPI ,MDR 


DLRX 


HL2MR,,SMR 


DADDP 


URO+UR»MARI 



GET DATA AND UPDATE HL 



LDTR 
MWAIT 


TEMPI ,CC 
,MEMPF3 


DOPP 


LUF,SB,MDR 


BRA 
BRA 


RIN256,TZ 
RIND 



GET DE DATA 



SUBTRACT HL DATA AND SET COMPARE FLAGS 

CONTINUE IF A MATCH (CARRY ZERO TOO!) 
END I.F DATA DIFFERS 



( 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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PH0C14G3/L 


IB 


M] 


[CHO-PROCESSOH 


EM 


OLATION SUPPORT 










• 


DECIMAL FIELD 


OPERATIONS 


918. 








• 










919. 


003157L 






DFOP 








920. 












(111 041 ) 


DFAC 


921 . 










-0.30 


+ C * 7. 


25 




922. 


















923. 


















924. 


















925. 












(062 041 ) 


DFSB 


926. 










-0.30 


* C-* 7. 


25 


(•+ 0.20 PER BO 


927. 


















928. 


















929. 


















930. 


003157L 
003160L 


01010001 
011011 11 


0000 1 1 1 1 

1 1 110010 






LDRI 




TEMP2,017 


931 . 


003161L 


01010001 


10000101 






SAL 




, [)\^km 


932. 


003162L 


11001011 


01101011 






BRA 




BFOP.T@,IO 


933. 


003163L 


1 0.1 000 1 


10001010 






BAL 




, DFSUB 


934. 


003164L 


1 1 00 1 1 1 1 


01101011 






BRA 




BFOP 


935. 


















936. 


003165L 






DFSUB 








937. 


003I65L 
003166L 


01 110100 
00 1101 It 


11 11 0001 
00000 1 10 






DOPR 




LUF, SB, TEMPI 


938. 


003167L 


11 000000 


01111111 






BRA 




DFAEND»FC 


939. 


0031 70L 


01010010 


00001001 






DOTI 




♦AC, 10-1 


940. 


003 1 7 1 L 


1 1 00 1 1 1 1 


1 1 ill 11 






BRA 




DFAEND 


941 . 


















942. 


003 1 72L 






wkm 








943. 


003I72L 
003173L 


01 1.1 0010 
0110 1111 


1 1 110001 
1 1 110001 






DORR 




TEMPI , AC, TEMPI 


944. 


0031 74L 
003175L 


01 01 00 10 
00 110 1 11 


1 1 110110 

00000 no 






DO.PI 




LUF,AC,-10 


945. 


0031 76 L 


1 1 000001 


01 1 1 1 t 11 






BRA 




DFAEND, TC 


946. 


003177L 


01 1 I 0001 


1 1 110001 






LDTR 




TEMP 1 


947. 


003200L 


00 1 1 00 1 1 


11010001 


DFAEND 


DOPP 




MDrt,OR,URI+URB 




00320 IL 


001101 11 


00101001 













79DECJ2 J6«20 



DECIMAL FIELD ADD 

(DE) <- B .OR. (DE) .DAD. (HL) + CRY 

DE <- DE - 1 ? HL <- HL - J 

C <- C - 1 J UNTIL = (16) 

DECIMAL FIELD SUBTRACT 
U (DE) <- B .OR. (DE) .DSB. (HL) - C 
OH <- DE - 1 ; HL <- HL - 1 
C <- C - l; UNTIL =0 (16) 

SELECT 4 BITS, NOT ALL OF THEM 

(ASSUME THIS) 

rtAS ODD THEREFORE WAS DECIMAL ADD 

WAS EVEN SO IT WAS DECIMAL SUBTRACT 



SET FXAGS ON SUBTRACT 

NO CARRY, NO PROBLEMS 

CARRY, CORRECT THE VALUE (ADDS 10!) 



ADD TOGETHER (CARRY FALSE ON RESULT) 

SET FLAGS & CORRECT IF OVERFLOW 

IF OVERFLOWED, CORRECTED NOW 
NO CARRY, GET CORRECT VALUE 
SET THE ZONE BITS 



948. 



BRA 



RIN16 



UATAPOINT CONFIDENTIAL. INFORMATION -SHE PAGE I 



PAGE 36 



951 . 
952. 
953. 
954. 
955. 
956. 
957. 
958. 



959. 
960. 
961 . 
962. 
963. 
964. 
965. 



PH0C14G3/LIB 



003202L 



003202L 
003203L 
003204L 
003205L 
003206L 
003207L 

0032 lOL 



000101 11 
00 1 1 000 1 
OIOIOIOO 
OOllOt II 
01000101 
11 000010 



10 110010 
11010010 
00000001 
10000010 
00001 1 II 
1 1 1 1 00 



110 1 1 100 
ItOI 1 1 11 
10001 100 

1.1 moil 

0032 14L 1100 1 111 111 11100 



0032 lOL 
00321 IL 
003212L 



00 I I OOfl 1 
OlOIOiOl 
001101 II 



966. 003213L OlOIIOOl 



MICRO-PROCESSOR EMULATION SUPPORT COOE - HJS - 79UEC12 16«20 

. REPEATED INSTRUCTIONS, REPEAT CONTROL SECTION 

* 

HIN16: 

. RPT - 1.70, SRV - J. 45, END -1.40 

FIELD REPEATED INSTRUCTIONS ARE THOSE THAT COUNT C THROUGH 16 MAX STEP 

CCLR 

DOPIP UR0+UHC,SB,1,URI+URC COUNT DOWN 



TSTIT 
BRA 



,017 
RJNST,FZ 



AT THE END {BASE 16)? 
NOT YET 



* 

RIND* 
. 0.70 



REPEATED INSTRUCTION END 
DOPIP PSWO,ND,-l-SrtRPT,PSrtI 



BRAX 



FETCH W 



( 
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969. 
970. 
971. 
972. 
973. 
974. 
976. 
976. 

9 77. 

978. 
9 79. 
980. 
981. 
982. 
983. 
984. 
98lD. 

986. 
98/. 
988. 
989. 
990. 
991. 
992. 



993. 



994. 
995. 

996. 
997. 

998. 



999. 
000. 



PR0C14G3/LIB 



0032 15L 



0032 15L 
0032 16L 
0032 1 7L 
003220L 

00322 IL 



00322 IL 
003222L 
003223L 

003224L 



003224L 
003226L 
003226L 
003227L 
003230L 
00323 1 L 
003232L 
003233L 
003234L 
00323bL 
003236L 
003237L 
003240L 
003241 L 
003242 L 
003243L 
0032 44L 
003245L 
003246L 
003247L 
003250L 
00325JL 
003252L 
003253L 

0032b4L 
00325bL 



OlOlOOfll 

oiioi 1 n 

OlOJOOOl 
llOOt 1 M 



01010001 
01 101 I II 
010,10001 



I 1 0. 1 I 1 1 
00 110001 
00 1100X)1 
00 1101 11 
00 1 1 000 1 
010101 00 
00 1101 11 
00 1 10001 
01010100 

00 1 1 I 1 1 

01 1 10001 
1 1000 100 
110101 11 
00110101 
I I 1 1 1 1 

10001 
10001 
101 11 
10001 
01 00 



00 
00 
00 
00 
0101 



00 1 10 1 11 
00 110001 
01010100 
OOTlOl II 



1 1 1 1 1 1 II 

1 1 II 0010 
01001000 
OllOlOII 



1 1 1 1 1 1 11 

1 I 110010 
01 00 I I 00 



10 11 0000 
I 1100101 
11000 110 
010001 11 
10010000 
00000001 

10000 110 
10 110000 
00000000 
10000101 
1 1 1100 10 
01100000 
00010100 
00110 I 10 
10 110001 
J IIOOOII 

I I 000 100 

010001 II 
10010000 
00000001 
10000100 
10 I 10000 
.00000000 

I 00000 II 



DATAFOINT CONFIDHNTIAL INFORMATION - SHE PAGE I 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. BINARY FIELD OPERATIONS 



79DECI2 16*20 



* 

BFSBi 

( 03 1 ) BFSB 
. -0.30 + C • 6.90 



LDRI TEMP2,03 77 
BRC BFOP,,BFSUB 

• 
BFAC« 

( Oil) BFAC 
. -0.30 + C * 6.70 



BINARY FIELD SUBTRACT 
(DE) <-. (DE) - (HL) - CRY 
D£ <- DE - l; HL <- HL - 1 
C <- C - I ; UNTIL =0 (16) 

SELECT ALL THE BITS 



LDRI 
BAL 



* 

BFOP 
. 4.0 



BAS 
DLRX 



DDECP 



LDTR 
MWAIT 

DORP 

DLRX 

DDECP 



rEMP2,0377 
,BFADD 



LINK,CC 
HL2MR,,SMR 



URO+UR,MARI 



BINARY FIELD ADD 

(DE.) <- (DE) ♦ (HL) + CRY 

DE <- DE - 1 ; HL <- HL - 1 

C <- C - I ; UNTIL = (16.) 

SELECT ALL THE BITS 



BINARY FIELD OPERATIONS (ARG GETIER ) 



GET (HL) DATA AND UPDATE HL 



TEMP2 
»MEMPF3 

TEMPI ,ND,MDR,.CC PUT IT IN TEMPI 

DE2MR.,SMR 



URO*UDE.MARI 



GET. (DE) DATA AND UPDATE DE 



00 
00 



10001 
10010 



00 
00 



0101 
0101 



CARRY IGNORED, BITS 2d6 NOT BOTH HIGH 
DOTPP ♦AC,.UCFLG,UCFLG SET THE CARRY 
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PR0C14G3/L 


IB 


MICRO-PR( 


3CESS0R 


EMULATION. SUPP 










. BINARY 


FIELD 


OPERATIONS 


1001. 


003256L 


01 110001 


11 IIOOIO 




LDTR 


TEMP2 


1002. 


OD 32 5 7L 
00326 OL 


11000100 
IIOlOl It 


0101 0000 
00010100 




MWAIT 


, ,MEMPF3 


1003. 


00326.1 L 


00 110101 


00 no NO 




DOTP 


,ND,MDR 


1004. 


003262L 


1 lion 11 


00000000 




BRR 


LINK 


1005. 








• 






1006. 


003263L 
003264L 


01 1.10010 
00 1 1 1 1 1 


1 1 11000 1 
00 101 001 


BFADD 


■ DO.PR 


MDW,AC,TEMP 


1007. 


003265L 


00 1101 11 


00000 110 




LDPT 


LUF 


1008. 


0032 66L 


11001 111 


01 1 1 1 101 




BRA 


RIN16 


1009. 














1010. 


00326 7L 
003270L 


01 110100 
00 1 101 11 


1 1 II 0001 
00101 001 


BFSUB 


DOPR 


MDrt,SB.TEMP 


1011 . 


0032 71 L 


00 1101 II 


00000 110 




LDPT 


LUF 


1012. 


003272L 


1 1 00 1 1 1 1 


01 111101 




BRA 


RINI6 



79DECI2 16*20 



SELECT ADD & SUBTRACT, BINARY & DECIMAL 
(DE) <- <DE) + (HL) 



,(DE) <" (DE) - (HL) 



f 
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lOJb. 
1016. 
1017. 
1018. 
1019. 
1020. 
1021. 
1022. 
1023. 
1024. 
1025. 
1026. 
1027. 



1028. 
1029. 
1030. 



PH0C14G3/LIB 



MICHO-PROCESSOrt EMULATION. SUPPORT CODE - HJS 
. BINARY FIELD SHIFTS LEFT AND RIGHT 



79DEC12 16*20 



1031 . 
1032. 
1033. 
1034. 

103b. 
1036. 
1037. 
1038. 
1039. 
1040. 

1 041 . 
1042. 
1043. 
1044. 



104b. 
1046. 
1047. 



048. 
049. 



0032/3L 



0032 73L 
003274L 
0032 7bL 
003276L 

0032 77 L 
003300L 
003301L 
003302L 
003303L 
003304L 
00330bL 
003306L 
003307L 
0033 lOL 
0033 UL 
00.33 12L 
0033 13L 
0033 14L 
0033 15L 
00 33 16L 
0033 17L 
00 3320 L 

00332 IL 
00 33 22 L 
003323L 
003324L 
00332bL 
003326L 
ttO 332 7L 
003330L 
003331L 
003332L 
00 3333L 
003334L 
00333bL 
003336L 
003337L 
003340L 



00 110001 
00 110001 
00 1 1 1 1 1 
It 001 001 

00 110001 
00010 1 10 
00 1101 11 
00 11 000 I 
00 1101 10 
00 110001 
000101 It 
000101 11 

11 000 too 

110101 11 
00 It 0001 
000101 11 

00 1101 It 
000101 It 
II It 11 

01 110010 
00 1 1 1 1 1 
1 1 00 t 1 1 1 

00010 1 11 
00110001 
01 0101 00 
00 1101 11 
00 11 0001 
01010100 
00 1 1 1 1 1 
001 1000 t 
00110010 
It 0001 00 

iiotot It 

00 I 10001 

00 110010 

00 not 11 

00 1 1 I 1 1 

110011 11 



t 1100101 

t.ioooiio 

01 000 1 1 1 
00 I 1 1 1 

10010000 

01 iiooto 

10000110 
toil 0000 
10000101 
00 110101 
10100010 
10 110010 

00 I I 1 000 
00010100 
00110110 
10010010 
00101001 
10010010 

1 1 110001 
001 J 0001 

00000 1 11 

01 1 11101 

101 100 JO 
10010000 
00000001 
10000 110 
10 110000 
00000000 
10000101 
00110101 
00110101 
00 1 00 1 1 
00010100 
00110 110 
001 10 1 JO 
00101 001 
00000 1 II 
01111101 



BFSi 

( 075) BFSL 
. -0.30 + C • 4.5b 



( 1 IJ 07b) BFSR 
. -0.30 + C * 4.bb 



BINARY FIELD SHIFT LEFT 

(HL) <- (HL) + (HL) + CRYl HL <- HL - 

C <- C - 1 » UNTIL =0 (16) 

BINARY FIELD SHIFT RIGHT 

(HL) <- SHFTRGHT (HL)I HL <- HL * 1 

C <- C - n UNTIL =0 ( 16) 



. BFSR 



* 

BFSL 



NOTE* ONLY CHANGES THE CARRY FLAG 
DLRX HL2MR,tSMR GET DATA TO SHIFT & SELECT R/L ROUTINE 



BRA 
DADDP 



BFSL,T@,IZ 
URO+UR,MARI 



UPDATE HL 



LDTP 


UCFLG 


SHI FT 


SL 


CCLR 




MWAIT 


,MEMPF3 


LDTP 


MDR 


SHIFT 


SR 


LDPT 


MDM 


SHIFT 


SR 


LDRT 


TEMPI 


DOPR 


LUCF»AC,TEM 


BRA 


RIN16 


CCLR 




DDECP 


URO+UR,MARI 



PUT THE CARRY IN THE LSB i&lT 0) 
AND INTO THE LINK 



GET THE DATA 
DO EXTENDED SHIFT 
OUTPUT SHIFTED DATA 
PUT LINK IN THE MSB 



LUCF»AC,TEMP1 ,,C0 SET THE CARRY FROM THE MSB (LINK) 



UPDATE HL 

CARRY IS STOPPED IN BIT 2 OR 6 OR UCFLG 



DOTPP , AC, UCFLG, UCFLG SET CARRY FROM USER CARRY 

MWAIT ,MEMPF3 

DOPPP MDrt,AC,MDR,MDR . SHI FT LEFT! 



LDPT 
BRA 



LUCF 
RIN16 



SET CARRY ON RESULT 
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PH0CI4G3/LIB 



( 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. SHIFT OPERATIONS 



79DEC12 16120 



J 052. 
1053. 
1054. 
10 55. 
1056. 
1057. 

1058. 

1059. 
1060. 

1061. 
1062. 
1063. 
1064. 
1065. 
1066. 
1067. 
1068. 
1069. 
1070. 
1071. 

1072. 

1073. 
1074. 
1075. 
1076. 
1077. 
, 1 78 . 
1079. 
1080. 
1081. 
1082. 
1083. 
1084. 
1085. 
1086. 

1087. 



003341L 



003341L 
003342L 
003343L 
003344L 
003345L 
003346L 
003347L 

003350L 



003350L 
003351 L 
003352L 
003353L 
003354L 
00 33 55 L 
003356L 
003357L 
003360L 

003361L 



003361L 
00 3362 L 
003363L 
00 3364L 
003365L 
00 33 66L 
003367L 
00 33 70L 
003371L 
003372L 
00 33 73L 
00 33 74L 



00 1 1 000 1 
01101 1 11 
1 1 I 00 1 
00 1101 It 
00 110 110 
01011001 
11001111 



00 1 1 000 1 
000101 11 

00010 1 11 
00 1101 11 
0110.1 1 11 
01 110010 
00 1101 11 
010.11001 

1 1 00 I 1 I 1 



00 110001 
000101 11 
000101 11 
00 110001 
00010 1 II 
00 1101 II 
00010 1 11 
QIIOI 1 11 
01 110010 
00 1 1 1 1 t 
010 11001 
1 1 00 I 1 1 1 



IJOl 1 I I 

I I 1 1 000 
0011000 
00000 1 1 
1 000 I 1 1 

II IIIOI 
.11110 11 



1 J I 1 M I 
10 110010 
10010010 
10001 1 1 
1 I 11000 
00 11000 
00000 1 1 
1111101 
1111011 



00110101 
10100010 
10110010 
tlOl 1 I II 
10010010 
t 000 I I 1 1 
10010010 
1 1110001 
00 1 I 0001 

00000 1 II 

1 1 1 1 1 1 I 
1 I 1 1 1 1 1 



SLC» 
. 0.95 
. 0.95 



• 

SRC» 
.1.15 
. 1.15 



SRE» 
. 1.50 
. 1.50 



( 002) SLC 
(IMP 002) SLCR 



SHIFT LEFT CIRCULAR 

RN <- RCN-Dl CRY <- RO <- R7 



LDRP 

DOPR 

DOP 
BRAX 



( . 012) 
(IMP 012) 

LDTP 
CCLR 
SHIFT 
LDPT 
LDRT 
.DOPR 



TEMP 1 , 1 MP I 

LUCF,AC,TEMP1 .,C0 ADD TOGETHER AND SET USER CARRY 



IMPO»IT 
FETCHN 



SRC 
SRCR 

IMPI 



PUT CARRY IN THE LSB 

DONAT USE IMPFO. WILL GET BAD CARRY 



SHIFT-RIGHT CIRCULAR 

CRY <- R7 <- RQ\ R(N-I) <- RN 



SET THE LINK BIT ON LSB 
RIGHT CIRCULAR 
STORE RESULT 



BRAX 



SR 

IMPO 

TEMP 1 

LUCF,AC,TEMPI ,,C0 SET CARRY ON THE MSB IT 

FETCHN 



( 032) SRE 

(IMP 032) SRER 



LDTP 
. SHIFT 
CCLR 
LDTP 
SHIFT 
LDPT 
SHIFT 
LDRT 
. DOPR 

BRAX 



UCFLG 
SL 



SHIFT RIGHT EXTENDED 

R7 <- CRYl R(N-l) <- RN; CRY <- RO 

GET CARRY 

IN LSBIT 

AND INTO LINK 



IMPI 

SR 

IMPO 

SR 

TEMPI 

LUCF»AC,TEMP1 ,.C0 SET CARRY ON LINK 

FETCHN 



DO RIGHT EXTEND 
PUT LINK IN MSBIT 
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PK0CI4G3/LIB 



MICHO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 
. SHIFT OPERATIONS 



79DEC12 J6«20 



1 



088, 
089. 



090. 
091. 
092, 
093. 
094. 
09b, 



1096, 



003375L 
003376L 
00 33 77 L 

003400L 



003400L 
00340 1 L 
003402L 
0034.03L 
003404L 



11 1 It I 11 
11 I in 11 
11111111 



I 1 1 1 1 I II 
I 1 I 1 1 1 II 
1.1 II 1 I II 



00 110001 
01010IX)1 

00 1101 I I 

1 1 1 00 1 
1 100 I I II 



OOIIOIO 
II 0000 I 

1 0001 1 1: 
1 1 1 not 

I I 1101 1 



TAB PAGE PRODL 



• 

ccs» 

.0.70 
. 0.70 



( 042) 
(IMP 042) 

.DOPIP 



BRAX 



CCS 
CCSr 

IMPO,ND»0303,UCFLG 



FETCHN 



CONDITION CODE SAVE 

R <- (CRY)(SGN)0000(~ZRO.SGN){"'ZRN.PrY) 



(. 
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DATAPOINT CONFIDENTIAL INFOHMAflON - SEE PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. SINGLE AND DOUBLE PAGED LOAD AND STORE 



( 



79DEC12 16«20 



1099. 
1 100. 
HOI . 
1102. 
1103. 
1 104. 
1105. 
1106. 
1107. 
1108. 
1109. 
1 110. 

nil. 

1 112. 
1 113. 
1 114. 
1 llt>. 
1 116. 
1117. 
1 1 18. 

1119. 

1120. 
1121. 

1122. 
1123. 



1124. 
1125. 

1126. 
1127. 
1128. 
1129. 
1130. 
1131. 
1132. 
1133. 
1134. 
M35. 
1136. 
1137. 
1138. 
1 139. 
1140. 
1141 . 
1142. 
1143. 
1 1 44. 



003405L 



PLR» 
3. 



003405L 
003406L 
003407L 
0034 lOL 
0034 ML 
0034 12L 
0034 1 3L 
0034 14L 
0034 15L 
0034 16L 
0034 1 7L 
003420L 
00342 IL 
003422L 
003423L 
003424L 
003425L 
003426L 

003427L 



00 1 10 1 II 
00 1 10001 
00 1 10001 
11010100 
110101 11 
00 I I 0001 
OOlJOOOl 
00 1101 11 

00 1 1 1 1 1 

11001 no 

1 I 0101 00 
110101 11 
00 1 i 1 1 1 
00 110001 
00 110 1 11 
11011001 

oonoi II 

110 11111 



01000 1 11 
10001001 
10101000 
11110111 
00010100 
1 1 1 00 11 1 

00 1 1 1 I 
11000000 
01 000 111 

1 II 1 1 1 II 

1 111 0000 
00010100 
0000 I I 00 
00 110 110 

looonoi 

01000000 
01000 I II 
01000100 



4.25 



PSR* 
2.20 



3.35 



1R4) PLR.IDX 
105) PLR.IDX 
114) PLR.IDX 
124) PLR.IDX 
134) PLR.IDX 
144) PLR.IDX 
154) PLR.IDX 
164) PLR.IDX 

111 124) DPL.IDX 
062 114) DPLR.IDX 
1 13 144) DPL.IDX 
174 134) DPLR.IDX 
115 164) DPL.IDX 
1.76 154) DPLR.IDX 

STB SMR 

DLDX MR2PC 

MWAIT ,MEMPF3 

LDX XX2MRH+URX 

LDPP MAROL,MDR 

STB SMR 

MWAIT N00P,MEMPF3 



STB I MAR 

LDPP I350,MDR 

BRA FETPL,T@,IZ 

STB SMR 

BRA DPLOAD 



1R6) PSR.IDX 

107) PSR.IDX 

116) PSR.IDX 

126) PSR.IDX 

136) PSR.IDX 

146) PSR.IDX 

156) PSR.IDX 

166) PSR.IDX 

111 126) DPSR.IDX 

062 116) DPSR.IDX 

113 146) DPS.IDX 

174 136) DPSR.IDX 

115 166) DPS.IDX 



LOAD REGISTER FROM PAGED LOCATION 
A-REG LOAD (104 IS NOT A PLR) 
R <- .(X,IDX) 



: <- (X.IDX); B <- (X,iDX*i) 

3 <- (X.IDX); C <- (X,IDX+1) 



<— 

<-— 
<- 
<— 
<— 



(X,IDX); 
(X»IDX.); 
(X,IDX); 
(X,IDX.)» 
iX,IDX)» 



<- 
<- 
<— 
<- 
<— 



(X,IDX+1) 
(X^IDX+l ) 
(X»IDX+I ) 
(X,IDX*1 ) 
(X,IDX+1 ) 



GET THE INDEX 

AND SAVE AWAY NEW PC 



MSB ADDRESS 
LSB ADDRESS 

AND GET DAfA 



GOT THE DATA 

IF IMP NOT ZERO GET ANOTHER BYTE 



STORE REG INTO PAGED LOCATION 
A REG SAVE (106 IS NOT A PSR) 
XX,IDX) <- R 



(X.IDX) 


<— 


CI 


(X,IDX+1 ) 


<— 


B 


iX»IOX) 


<— 


e; 


(X,IDX+I ) 


<— 


C 


(X,IDX) 


<— 


e; 


(X,IDX+1 ) 


<— 


D 


.(X»IDX) 


<- 


D; 


(X,IDX+I ) 


<- 


E 


(X,IDX) 


<— 


Li 


( X . I DX+ 1 ) 


<— 


H 



\ 
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1145. 








1146. 








1147. 


003427L 


00 1101 11 


010001 11 


1148. 


003430L 


00 1 1 000 1 


10001001 




00343.1 L 


00 110001 


10101000 


I 149. 


003432L 


11010100 


1 1100101 




003433L 


110101 11 


00010100 


1150. 


003434L 


00 1 1 000 1 


1 1 1 00 1 1 1 


1151. 


003435L 


00 110001 


00110 110 




003436L 


001 10 1 11 


1 1000000 


1152. 


003437L 


00 1 10001 


11011 101 




003440L 


00 1 1 i 1 t 


00101001 


1 153. 


00344 IL 


1 1 1 1 000 


00 1 11011 


1 154. 


003442L 


01011001 


1 1 1 noil 




003443L 


1 1 00 1 1 1 1 


1 1 1 1 1 1 00 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 
. SINGLE AND DOUBLE PAGED LOAD AND STORE 



79DEC12 16x20 



(176 156) DPSR.IDX 



STB 
DLDX 


SMR 
MR2PC 


MrtAIT 


,MEMPF3 


LDX 
LDPP 


XX2MRH+URX 
MAROL.MDR 


LDPP 


MDrt,I35I 


BRA 
BRAX 


DPSTOR,F@,IZ 

FETCHW 



(X,IDX) <- H; (X,IDX+1) <- L 

GET THE INDEX 

UPDATE THE PC SO IT CORRECT 



AND MSB ADDRESS FROM X-REG 
LSB ADDRESS 

SAVE THE REGISTER IN MEMORY 

STORE MSB IF IMP NON-ZERO 
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1157. 
I 158. 
1159. 
1160. 
1161. 
1162. 
1163. 
1164. 
1165. 
1 166. 

1167. 

I 168. 
1169. 
1170. 
1171. 

II 72. 
1173. 
1174. 
1175. 
1176. 
11 77. 
1178. 
1 1 79 . 
1180. 
1 131 . 
1182. 

1183. 
1184. 
1185. 
1186. 
1187. 
1 188. 



1189. 

1 1 90 . 
1191 . 



1192. 
1193. 
1194. 



PH0C14G3/LIB 



003444L 



003444L 
003445L 
003446L 
003447L 
003450L 

003451 L 



00345 I L 
003452L 
003453L 
003454L 
003455L 
003456L 
003457L 
003460L 
00346J L 
00 3462 L 
003463L 
003464L 
003465L 
003466L 
003467L 
0034 70L 
00347 1 L 



11011000 
01010001 
00 1 1 1 1 1 
00 110001 
110 111 11 



I 1 1 1 000 
OlOlOOOl 
00 I 1 1 1 1 
01010001 
IIOIIOIO 
OlOlOOOl 
00 1 1 1 1 1 
QlJOll 11 
00 110001 
ON 10010 

00 I 101 II 

1 1 I 00 1 
11000000 
00 110 1 11 
00 1 10001 
01010010 
00 1101 II 



no II 000 
00000 no 

00000001 
11010000 
I I 00 I I II 



n 1 00 1 1 

00000 110 
00000001 
00000001 

1 1001 1 11 
00000010 
00001001 

1 1 noooi 
noi 1 1 n 

001 10001 

onoi 1 n 

I 1 1 I I 1 1 

1 1 1101 n 

00001001 

I I 11 1 11 
00000000 
OIIOI I 11 



003472L 11 001 I II II 1101 II 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 
. REGISTER PAIR INCREMENT AND DECREMENT 



79DEC12 16x20 



NCPA* 
I .50 
1.35 
1.35 
1.35 



( 017) 

(062 017) 

(174 017) 

(022 017) 



INCP 
INCP 
INCP 
INCP 



+0.65 IF CRY FROM LSB 



INCP AS 



NCP« 
1.45 
1.45 
I . 30 
I .45 
1.30 
1.45 
.1 .45 
1.30 



BRA INCPAS,F§,IZ 

LDP I LIMP, URL 

LDTP URI+URA 

BRA INCPIT 



( 015) INCP 

(111 015) INCP 

(.062 015) INCP 

( 113 015) INCP 

( 1 74 015) INCP 

(115 015) INCP 

(1.17 015) INCP 

(022 015) INCP 



HL <- HL * A 

BC <- BC + A 

DE <- DE * A 

XA <- XA + A 



USE HL IF NO IMP SPECIFICATION 



T LOADED WITH VALUE TO ADD, GO DO IT 



HL 


<— 


HL 


+ 


1 


XA 


<- 


XA 


+ 


2 


BC 


<- 


BC 


+ 


1 


BC 


<— 


BC 


+ 


2 


DE 


<— 


DE 


+ 


1 


DE 


<— 


DE 


* 


2 


HL 


<— 


HL 


+ 


2 


XA 


<— 


XA 


.+ 


1 



+0.65 IF CRY FROM LSB 



INC PS 



INCPIT 



BRA 
LDPI 

LDTI 

BRA 

LDTI 

STB 

LDRT 

DOPRP 



BRAX 



INCPS,F@,IZ 
LIMP, URL 

1 

INCP IT, FS, 10 

2 

DIMP 

TEMP 1 

IMPF0,AC,TEMP1 ,IMPJ,CO INC THE LSB (T-SAVE NECESSARY) 



DEFAULT TO HL PAIR 

ASSUME ITS BY 1 (ODD) 

NO, BY 2 CAUSE WAS EVEN 
CORRECT IT TO BE ODD 



FErCHN,FC 



IF NO CARRY FORGET THE MSB 



STB DIMP 

DO-PIP IMPFO,AC,0,IMPI INC THE MSB (COULD ilSE IT) 



CAN-'T USE ^IT IMPFO' BECAUSE DELAYED 
ALU CARRY THROUGH PROCESSOR CARRY 



BRA 



FETCHN 



( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 
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MICriO-PHOCESSOH 
. REGISTER PAIR 



EMULATION SUPPORT CODE - HJS 
INCREMENT AND DECREMENT 



79DEC12 16S20 



1 195. 

1196. 
1197. 
1 198. 
1199. 
1200. 
1201 . 
1202. 
1203. 
1204. 

1205. 
1206. 
1207. 
1208. 
1209. 
1210. 
1211. 
1212. 
1213. 
1214. 
1215. 
1216. 
1217. 
1218. 
1219. 
1220. 

1221. 
1222. 
1223. 
1224. 
1225. 
1226. 



1227. 

1228. 
1229. 



1230. 



0034 73L 



003473L 110 11000 11 00000 1 



003474L 
003475L 
0034 76L 
0034 77L 

003500L 



01010001 
00110 1 11 
00 1 10001 
110 11111 



003500L 
00350 IL 
003502L 
003503L 
003504L 
003505L 
003506L 
003507L 
0035 lOL 
0035 ML 
00.35 12L 
0035 13L 
0035 14L 
0035 15L 
0035 16L 
0035 1 7L 
003520L 
00352 IL 



110 11000 
01010001 
00 1101 11 
01 01 0001 
IIOIIOIO 
OlOlOOOl 
00 1101 11 
01101111 
00 1 10001 
01 110100 

00 1 1 1 I 1 

1 1 1 00 1 
11 000000 
00 1101 11 
00 110001 
01010100 
00 1101 II 
11001 1 11 



00000110 
00000001 
11010000 
10 1 II 000 



10 11 1100 
00000 1 10 
00000001 
00000001 
101 11000 
00000010 
00001001 

i 1 11 0001 

1101 I I II 

00 110001 
OIIOI I II 
11111011 

1 I llOlli 
00001001 
1101 I 1 II 
00000000 
110.1 1 11 
11110111 



+ 

DEC PA: 
1.50 
1 .35 
1.35 
1.35 



{ 037) DECP 

(062 037) DECP 

(174 037) DECP 

(022 037) DECP 



+0.65 IF BRW FROM LSB 



BRA DECPAS,F@,IZ 
LDPI LIMP, URL 

DECPAS LDTP URI+URA 

BRA DECP IT 
• 
DECP 

1 . 

I. 

1. 

1. 

1 . 

1. 



t 

45 ( 035) DECP 

45 ( 111 035) DECP 

30 (062 035) DECP 

45 (113 035) DECP 

30 (174 035) DECP 

45 ( 115 035) DECP 

1 .45 (117 035) DECP 

1.30 (022 035) DECP 

+0.65 IF BRW FROM LSB 



DECPS 



DECP IT 



BRA 
LDPI 

LDTI 

BRA 

LDTI 

STB 

LDHT 

DOPRP 



BRAX 

STB 
..DQPIP 



HL <- 


HL - A 


BC <- 


BC - A 


DE <- 


DE - A 


XA <- 


XA - A 



SELECT HL AS DEFAULT REG PAIR 



GO DECR. USING A-REG AS DISP. 



HL 


<— 


HL - 1 


XA 


<— 


XA - 2 


BC 


<— 


BC - 1 


BC 


<— 


BC - 2 


DE 


<- 


DE - 1 


DE 


<— 


DE - 2 


HL 


<— 


HL - 2 


XA 


<— 


XA - 1 



BRA 



DECPS,F§»IZ 
LIMP, URL 

I EXACTLY LIKE ABOVE BUT USING SB^S NOT A 

DECPIT,F@,IO 

2 

DIMP 

TEMP 1 

IMPFO, SB, TEMPI ,IMPI,CO 



FEfCHN.FC 

DIMP 

IMPFO, SB, 0,IMPI 



FETCHN 



IF NO CARRY FORGET THE MSB 
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233. 
234. 
23b. 
236. 
231. 
23Q. 
239. 
240, 
24J . 
242. 
243, 
244. 
245. 
246. 
247, 
248. 
249, 

250, 
251. 
252. 
253. 
254. 
255, 
256. 
257. 
258. 
259. 
260. 
261 . 
262. 
263. 
264. 
265. 
266. 



MICHO-PROCESSOR EMULATION SUPPORT CODE - HJS - 79D.EC12 16»20 

. INDEXED LOCATIONS, INCREMENf AND DECREMENT IN PLACE OR TO REG PAIR 



003522L 



DECXx 



7.30 
8.90 

6.40 
8.00 



003522L 
003523L 
003524L 

003525L 



00 110 1 n 0)00011) 
010)0001 01)))00) 
)10))))) 10101000 



* 

INCX* 



7.20 
8.80 

6.50 

8.20 



003525L 00 1101 11 01000 
003526L 010)000) ) 000 ) 



( 



025) DECI.LSP.IDX 



(X,IDX+) I X,IDX) <- 

(X,IDX+) I X»IDX) - DSP 

())1 025) DECI.LSP.MSB.IDX {X,IDX+) I X,IDX) <- 

(X,IDX+) ) XtlDX) - DSP 

(062 025) LFID.LSP.IDX RP <- (X,IDX+) I X,IDX) - DSP 

(174 025) LFID.LSP.IDX 

(176 025) LFID.LSP.IDX 



(113 025) LFID.LSP.MSP.IDX RP <- (X,IDX+1 1 X,IDX) - DSP 
(115 025) LFID.LSP.MSP.IDX 
(117 025) LFID.LSP.MSP.IDX 



STB SMR 

BRC INDX,,DECIT 



GET DISPLACEMENT LSP 

GO TO INDEX SPECIFYING OECIT SET 



( 005) INCI.LSP.IDX (X,IDX+1 I X»IDX) <- 

(X,IDX+) I X,IDX) + DSP 

(111 005) INCI.LSP.MSP.IDX (X,IDX+l I X,IDX) <- 

(XtlDX+l I X,IDX) + DSP 

(062 005) LFII.LSP.IDX RP <- (X,IDX+) I X,IDX) + DSP 

( )74 005) LFII.LSP.IDX 

(176 005) LFII.LSP.IDX 

(113 005) LFII.LSP.MSP.IDX HP <- (X,IDX-H I X,IDX) + DSP 
(115 005) LFII.LSP.MSP.IDX 
(117 005) LFII.LSP.MSP.IDX 



1 ) 



STB 
BAL 



SMR 
.INCIT 



GET DISPLACEMENT LSP 
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1267. 
1268. 
1269. 
1270. 
1271. 
1272. 
1273. 
1274. 

12 7b. 
1276. 

1277. 
1278. 
1279. 
1 28 . 

1281. 
1282. 
1283. 

1284. 
1285. 

1286. 

1287. 
1288. 

1289. 
1290. 
1291. 
1292. 

1293. 
1294. 

129b. 
1296. 
1297. 

1298. 

1299. 
1300. 

130 1 . 
1302. 
1303. 
1304. 

1305. 
1306. 
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003O27L 



003527L 
003530L 
003531 L 
003532L 
0035 33L 
003534L 
003535L 
003536L 
003537L 
003540L 
003541 L 
003542L 
003543L 
0035 44L 
003545L 
003546L 
003547L 
003550L 
00355 1 L 
003552L 
003553L 
003554L 
003555L 
D03556L 
003557L 

003560L 
00356 IL 
003b62L 
003563L 
003564L 
003565L 
003566L 
003567L 
003570L 
003571L 
003572L 
003573L 

003574L 
003575L 
003576L 
003577L 
00 36 00 L 
003601 L 
003602L 



QllOl 1 II 
11010100 
110101 11 
00 1 101 11 

00 110001 

01 IDI 1 11 
001101 II 
01010001 
1 1 01 1010 

I I 010 I 00 
110101 11 
00 1101 I I 
00110001 
001101 II 
00 I 101 11 
01 101 I 11 
00 110001 
00 II 000 I 
1 10101 00 
110101 11 
00 I I 0001 
00 I 10001 
00 1101 11 
00110 1 11 
lllOll It 

1 101 01 00 
liOIOI 11 
00 1 101 I 1 

00 1 10001 

01 110010 
00 1 10 1 11 
01 101 1 11 
11010100 
11010111 

00 110001 

01 110010 

I I I I 000 

00 1101 II 
00 I 101 11 
01 110001 
11010100 
llOIOI 11 
00 I I 1 I 1 
1101 I 1 II 



1 I 1 1 0000 
10100 I 11 
000 I OJ 00 

0000 1 1 00 
00110 110 

1 I 110010 
010001 II 
00000000 

I 00 1 1 00 1 
1001 1 I 11 
00010100 
0000 1 1 00 

00 110 110 
00001001 
01000 I I 1 

II IIOOOI 
10001001 
10101000 
10010110 
00010100 

1 1 1 00 I 1 1 
00 1 10 110 
11000000 
01000 I 11 
00000000 

10001 1 II 
00010100 
00001100 

00 1 1 I 1 
00110010 
01000 1 11 

1 1 1100 to 
10001 000 
00010100 

00 110110 

1 I 110001 
01101101 

00101001 
00000110 
I I 110010 
10000000 
000 1 t 00 
00001 101 
I 1 1 I 1 00 



MICHO-PROCESSOrt EMULATION. SUPPORT CODE - HJS - 79DECI2 I6«20 
. INDEXED LOCATIONS, INCREMENT AND DECREMENT IN PLACE OR TO REG PAIR 

+ 
INDX 

. INDEXED OPERATIONS TAKES 2 B.YTES ON PAGE X-REG ADDS DISPLACEMENT TO IT 
AND STORES THE RESULT IN A REG. PAIR OR BACK ON TOP OF ITSELF 



BAS LINK 

MrtAIT »MEMPF3 

STB I MAR 

LDRP TEMPL,MDR 

STB SMR 

TCLR 

BRA INDGET,Fe,IO 

MWAIT .MEMP.F3 

STB I MAR 

LDTP MDR 

STB D I MP, SMR 

INDGET LDRT TEMPH 

DLDX MR2PC 

MWAIT ,MEMPF3 - 

LDX XX2MRH+URX 

LDPP MAR OL, MDR 

. STB SMR 

BRR LINK 



* 

INCIT 



FREE REGISTER FOR INC, DEC SELECT 



SAVE LSP (LSP DISPLACEMENT) 

GET MSP OR INDEX 
ASSUME MSP IS ZERO 

NO, GET MSP OF DISPLACEMENT 



GOT MSB 

CORRECT IMP REG AND GET INDEX 

SAVE MSP 

PC SAVED AS CORRECT VALUE NOW 

GOT INDEX 

MAR MSB FROM THE X-REG 
INDEX TO THE MAR LSB 



SELECT DECIT OR INCIT 



MWAIT ,MEMPF3 

STB I MAR 

DOTR P , AC , TE MP L , MDR , CO 

STB SMR 

LDRT TEMPL 

MWAIT ,MEMPF3 

DOTRP , AC, TEMPH, MDR 

BRA INDXL,FS,IZ 



INDXS LDPT MDW 

LDPT LUF 

LDTR TEMPL 

MWAIT ,MEMPF3 

STB DMAR 

DELAY 2 



ADD DATA AND DISPLACEMENT LSB 
START TO READ FOR MSB 

ADD MSB PART, LEAVE RESULT IN T 

SELECT LOAD REG PAIR OR RELOAD MEMORY 

PUT MSB RESULT BACK IN MEMORY 
SET CONDITION CODES 

PUT LSB DATA BACK ALSO 

IN CORRECT SPOT 



( 
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1307. 
1308. 

1309. 
1310. 

1311 . 
1312. 

1313. 
13J4. 
1315. 

1316. 

1317. 
1318. 
1319. 
1320. 

1321 . 

1322. 
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003603L 
003604L 
003605L 

003606L 
003607L 
00361 OL 
00361 IL 
0036J2L 
0036 13L 
0036 14L 
00361 bL 
003616L 
00361 7L 
003620L 
00362 IL 

003622L 
003623L 
003624L 
003625L 
003626L 
00362 7L 
003630L 



00 1 101 11 
01011001 

1 1 0£) 1 1 1 1 

110)0100 
IIOIOI 11 
00 1 I 1 1 1 
00 110001 
1110100 
001101 II 
0.11^11 11 
1)010100 
110)0))] 
00)) 000) 
0) ))0)00 
))0])00) 

00))01 )) 
00)10 1 11 
00 1 1 ) ) ) 
0) ))0001 
00 1)0) )) 
0)01)00) 
))00)1 1) 



00)0)00) 
) ) 11)0)) 
)))))) 00 

0) ) 11001 
00010100 
00001 100 
00110 1)0 
00)) 00)0 
0)000) 11 
1 11)00)0 
0)))00)0 
000)0)00 
00))0))0 
)) 110001 
100000 II 

00001001 

110 1111 
00001000 

1 1 110010 
10001 1 )) 
1 ) ) ))0)1 
1 1 1 1)0)0 
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MICRO- PROCESSOR EMULATION SUPPORT CODE - HJS - 79DECJ 2 )6«20 

. INDEXED LOCATIONS, INCREMENT AND DECREMENT IN PLACE OR TO REG PAIR 



DEC IT 



LDPT 
BRAX 



MWATT 



ma 

FETCH W 



, MEMPF3 



INDXL 



STB 
DOTRP 


I MAR 
,SB,TEMPL,MDR,CO 


STB 

LDRT 

MWAIT 


SMR 

TEMPL 

,MEMPF3 


DOTRP 


,SB.TEMPH,MDR 


BRA 


INDXS,T@,IZ 


STB 
LDPT 


DIMP 
IMPFO,IIMP 


LDPR 


IMPO, TEMPL 


BRAX 


FETCH 



SUBTRACT DISPLACEMENT FROM THE DATA 
START TO READ FOR MSB FAST 

SIMILARLY FOR THE MSB PART 

SELECT LOAD REG PAIR OR RELOAD MEMORY 

CORRECT POINTER TO MSB 

LOAD THE INDEX INTO A REGISTER PAIR 

THE LSB ALSO 



( 



DATAPOINT CONFIDENTIAL INFOHMATION - SEE PAGE I 
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PH0C14G3/LIB 


MICHO-PROCESSOH EMULATION SUPPO 










. DOUBLE 


LOADS AND 


DOUBLE STORE 


1325. 








• 






1326. 


003631 L 






DS» 






1327. 








. 3.35 


( 027) 


DS 


1328. 








. 4.05 


(111 027) 


DS 


1329. 








. 3.35 


(113 027) 


DS 


1330. 








. 3.20 


. ( 1 74 02 7 ) 


DS 


1331. 








. 3.20 


(176 027) 


DS 


1332. 








.3.35 


(117 027) 


DS 


1333. 














1334. 


00363 IL 
003632L 


01010001 
110.1 1 1 11 


001 1 1 no 

0101 1 1 11 




BHC 


DLS,,DSrORE 


1335. 








* 






1336. 


003633L 






DLHL » 






1 337 . 








. 3.95 


( 057) 


DL 


1338. 














1339. 


003633L 
003634L 


01010001 
OIlOll 11 


OlOOIIOl 
1 1 110000 




BAL 


LINK,DLOAD 


1340. 


003635L 


01010001 


00000 110 




LDTI 


URL 


1341. 


003636L 


11011 1 11 


OIOIOOOI 




BRA 


DLSLMP 


1342. 








• 






1343. 


00 3637 L 






DL« 






1344. 








. 3.95 


( 047) 


DL 


1345. 








. 4.65 


(111 047 ) 


DL 


1346. 








. 3.80 


(062 047) 


DL 


1347. 








. 3.95 


( 113 047) 


DL 


1348. 








. 3.80 


(174 047) 


DL 


1349. 








. 3.95 


( 115.047) 


DL 


1350. 








. 3.80 


(176 047) 


DL 


1351 . 








. 3.95 


(117 047) 


DL 


1352. 














1353. 


003637L 


01010001 


01001101 




BAL 


,DLOAD 


1354. 








• 






1355. 


003640L 






DLS 






1356. 














1357. 


003640L 


01101 1 11 


1 1 110000 




BAS 


LINK 


1358. 


00364 IL 


11011001 


01010010 




BRA 


DLSZRO,T@,IZ 


1359. 


003642L 


1 1 1 1 0.1 


010101 11 




BRA 


DLS3C,F@»I0 


1360. 


003643L 


00 1 1 1 1 1 


00001001 




STB 


DIMP 


1361. 


003644L 


00 1 10001 


11000100 




LDX 


DE2MRL 


1362. 


003645L 


11011001 


01010100 




BRA 


DISONE,T@,IZ 


1363. 


003646L 


00 110001 


1 11 000 11 




LDX 


DE2MRH 


1364. 


0036 47 L 


11101111 


00000000 




BRR 


LINK 


1365. 


0036DOL 


00 110001 


11000010 


DLSBC 


LDX 


XX2MRL+URC 


1366. 


00365 IL 


00 110001 


1 11 00001 




LDX 


XX2MRH*URB 


1367. 


003652L 


1. 1 t 1 1 1 1 


00000000 




BRR 


LINK 


1368. 


003653L 


01010001 


00000010 


DLS ONE 


LDTI 


URC 


1369. 


003654L 


llOi 1 111 


OIOIOOOI 




BRA 


DLSLMP 


1370. 


003655L 


OIOIOOOI 


00000100 


DLSZRO 


LDTI 


URE 


1371. 


003656L 


00 1 1 1 1 1 


00000001 


DLSLMP 


LDPT 


LIMP 


1372. 


003657L 
003660L 


00 110001 
00 1 10001 


11000 110 
1 1100101 




DLDX 


HL2MR 


1 373 . 


00366 IL 


1 1101 1 II 


00000000 




BRR 


LINK 



79DEC12 



6«20 



(HL) 
(HL) 
(DE) 
(BC) 
(8C) 
(DE) 



<- 
<- 
<- 
<- 
<- 
<- 



E; 

Cl 

c; 
E; 
L; 
L? 



( HL+ 1 ) 
( HL+ 1 ) 
( DE+ 1 ) 
( BC+ 1 ) 
(BC+1 ) 
( DE+ 1 ) 



<- 
<— 

<— 
<— 

<— 



D 
B 
B 
D 
H 
H 



SELECT REG PAIRS & DO SAVE 

L <- (HL)J H <- (HL*1 ) 

LOAD REG PAIR 

HL 

FROM (HL) 



E 
C 
C 

c 

E 
E 
L 

L 



<— 
<- 
<- 
<— 
<- 
<- 
<— 
<- 



(HL); 
(HL); 
(BC); 
( DE ) ; 
(BC); 
(DE); 
(BC); 
(DE); 



D 
B 
B 
B 
D 
D 
H 
H 



<- 
<- 
<— 
<— 
<— 
<— 

<— 



(HL+1 ) 
( HL+ I ) 
(BC+I ) 
( DE+ 1 ) 
(BC*1 ) 
(DE+1 ) 
(BC+1 ) 
(DE+1 ) 



LOAD SELECT 

DECODE ADDRESS & REG SPEC. OPERATORS 

DE,HL - 000 

XX, BC - 062, 114... 

DELAY ONE FROM THE DIMP BEFORE BRA 
BC,HL - 111 

XX,DE - 113, 115... 

XX, BC - 062. 114... 

BC,HL - I I 1 

DE, HL - 000 

XX, HL - 000, 111 , HL,HL 



DATAPOINT CONFIDENriAL INFORMATION - SEH PAGE 1 
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1374. 
1375. 
1376. 
13 77. 
1378. 



1379. 
1380. 

1381. 

1382. 

1383. 

1384. 

1385. 
1386. 
1387. 
1388. 



1389. 
I 390 . 

1391. 
1392. 
1393. 
1394. 



PH0C14G3/LIB 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS 
. DOUBLE LOADS AND DOUBLE STORES 



79DEC12 16*20 



003662L 

003662L 
003663L 
003664L 
003665L 
003666L 
003667L 
003670L 
003671L 
003672L 
003673L 
003674L 
003675L 
003676L 
0036 77L 
003700L 

003701L 

00370 IL 
003 702L 
003703L 
003 704L 
003705L 
003706L 
00370 7L 
003710L 
00371 IL 
003 7I2L 
003 7I3L 



00 1 10 1.11 
11001 110 
11010100 
110101 II 
00 1 10 1 11 
00 110001 
00 1101 II 
00 1101 11 
00 I I I 1 1 
II 0101 00 
IIOIOI 11 

00 1 I 000 I 

001 10 1 11 
OIOIIOOI 
1 1 00 1 I 1 1 



00 110001 
00 1101 II 
00 1101 II 

00 I I 000 1 
1 1 1 1 0.0 

noioi ij 

001 101 II 
1101 11 II 
00 1101 II 
OIOIIOOI 
1 1 00 1 1 1 1 



010001 II 

1 1 1 1 1 1 II 

OlOOIOIl 
OOOIOIOO 
0000 1 1 00 
00110110 
lOOOl 1 11 
010001 II 
00001001 
01000100 
OOOIOIOO 
00 1 1 1 1 
10001 I 11 

11 moil 

II I 11010 



noil I II 

00 1 1 00 I 
00001 001 

lion 1 II 

00 1 11010 
OOOIOIOO 
00001100 

00 110 110 
00101001 

1 1 1 noil 

1 I 1 1 I I 00 



* 

DLOAD 



DPLOAD 



FETPL 

* 

DSTORE 



DPSTOR 



STB 
MWAIT 



STB 
LDPP 

STB 

MWAIT 

LDPP 

BRAX 



LDPP 



LDTP 
MWAIT 

STB 
DELAY 
LDPT 
BRAX 



LOAD REGISTER PAIR FROM MEMORY 



SMR 
N00P,MEMPF3 



I MAR 
IMPO,MDR 

SMR,DIMP 

,MEMPF3 

IMPO.MDR 

FETCH 



GET THE LSB DATA 



GET THE MSB 



MDrt,IMPI,DIMP 



IMPI 
,MEMPF3 

I MAR 
2 

MDyv 
FETCH W 



SAVE REGISTER PAIR IN MEMORY 
OUTPUT LSB AND POINT TO MSB 



OUTPUT MSB 



UATAPOINT CONFIUENTIAL INFORMATION - SEE PAGE 1 
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1397. 
1398. 
1399. 
1400. 
1401. 
1402. 

1403. 
.1404. 



1405. 

1406. 
1407. 

1408. 
1409. 
1410. 
1411. 
1412. 
1413. 
1414. 
1415. 

1416. 
1417. 

1418. 
1419. 

1 42 . 
1421. 
1422. 
1423. 
1424. 
1425. 

1426. 
1427. 

1428. 
1429. 



PriOC14G3/LIB 



MICHO-PPOCESSOH EMULATION SUPPORT CODE - HJS - 79DEC12 16*20 

. BASE REGISTER AND INTERRUPT SYSTEM INSTRUCTIONS (0/2, 050, 040 OPrtCODtSr 



003714L 



0037 14L 
0037 15L 
003716L 
00371 7L 
003 /20L 
00372 IL 
003722L 
00.3723L 
003724L 
003 725L 
003726L 
003727L 

003730L 



00 110001 
01 000 101 
110.10010 
01010001 
00 1 1 1 I 1 
01010001 
00 1101 11 
00 1 1 000 1 
00 1101 II 
00 1 1 1 1 1 
01011001 
1 1 OX) 1 1 1 1 



1 1 I I 1 00 
00000100 
00010 110 
10101011 
11000000 
11101111 
1 1100000 
110 11111 

000000 11 
001 01 001 

1 1 111011 
1 1 1 1 1 I 00 



003730L 
003/31 L 
003 732L 
003 /33L 
003734L 
003 /35L 
003736L 
003737L 
003 740L 

00374 IL 



00 1 1 00.0 1 
01000101 
11010010 
1 01 00 1 1 
00 1 1 1 1 I 
00 1 1 1 1 1 
01011001 
11001001 
11001 I 11 



1 I I 1 1 00 
00000100 
00010 110 
00000001 
1000 1 100 
00000100 
111110 11 
1 I 1101 11 
100 1 1 101 



003 741L 00 1 10001 
003742L 01000101 
003 /43L IIOJOOIO 
003744L 01010101 
003/45L 00 1101 U 
003746L 00 1 101 II 



003 747 L 
003750L 



1 1 1 00 1 
1 1 00 1 1 1 1 



1101 1100 
00000 1 00 
0001 1 10 
11111110 
10001100 
00000100 

11 1 lion 

1 I 1101 II 



BRL» 
. 1.80 



( 072) BRL 

(IMP 072) BRL 

CTSTIP ,SrtUSER,PSrtI 

BRA IVI0L3,FZ 

DLDPI MARO.SEBRLS 



• 

EI« 

. 1.05 
. 4.10 
. 6.40 



* 

DIi 

. 1.05 



LDPP 

LDPT 
BRAX 



( 050) 

(111 050) 
(062 050) 



TSTIP 

BRA 
. OOP I 

LDPT 
BRAX 

BRA 



( 040) 

TSTI P 

BRA 
OOP I 

LDPT 
BRAX 



BASrt,IMPI 

MDW 
FETCHW 



EI 

EJMP.LSB.MSB 

EUR 



,SrtUSER,PSrtI 

IVI0L3,FZ 
PSWO.OR.SWINTE 

MODW 
FETCHN,T@,IZ 

EIROJ 



DI 
,SWUSER,PSWI 



rsTii 



S^^Y/t^ 



BASE REGISTER LOAD 
BASE <- (SEBRLS) <- ^ 



SAVE BASE REG VALUE Art AY 



LOAD BASE REG BEFORE rtRITE! 



ENABLE INTERRUPTS 

ENABLE INTERRUPTS & PC <- NN 

ENABLE INTERRUPTS & USER & 

PC <- (SP+1 I SP); SP <- SP + 2 

NOT ALLOWED IN USER MODE 



SET THE INTERRUPTS ON BIT 

IN EMULATION SUPPORT ALSO 
WAS SIMPLE EI 




iCf)/^ 



rtAS EJMP OR EUR 

DISABLE INTERt 
NOT ALLOWED 



IVI0L3,FZ 
PSrtO,ND,-l-SrtINTE RESET 




/^/? 



IM^^'^ ,^'^j^ 



USER MODE 



MODW 
FETCHN 



BITj/DlSABLING INTERRUPTS 

IN .emulation/support also 




/=r re /^'/ly 



( 
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FriOC14G3/LIB 



1430. 
1431. 

1432. 
1433. 

1434. 
.1435. 



1436. 
1 437 . 
1438. 
1439. 



> 003 75 I L 
>0037d2L 1 

003753L 
003 754L 1 



003 755L 

003756L 

003757L 

003760L 

003 76 1 L 

003762L 

003763L 

003764L 

003765L 

003766L 

003767L 

003 770L 

003 771L 

003 772L 

003773L 

003774L 

003 775L 

003 776L 

003 777L 

002000 

002 000 

002000 



01 
00 

01 
00 



QO 



00 







DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICHO-PHOCESSOR EMULATION SUPPORT CODE - HJS - 79DEC12 16»20 

.BASE REGISTER AND INTERRUPT SYSTEM INSTRUCTIONS (072, 050, 040 OP-CODES) 



* 

1VI0L3 



MEMPF3 



BRAX 
BRAX 



I VIOLS 
MEMPFS 



fABPAGE PRODL 



PRODLEN EQU 
USE 
SKIP 
END 



$-PRODP 

PRODL 

PRODLEN 







/7//f^ 









F Z 



,7y '•■' , / ^y\y 



.^y ' '■' ly 






^ / 






/ / 
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PH0C14G3/LIB 



( 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE i 
MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 



79DEC12 16*20 



AC 



002724 


AC$DO 


010015 


ACD 


002740 


ACEND 


002755 


ACHOUT 


002741 


ACLOUT 


002736 


ACSHRT 


002745 


ACSIG 


002567 


ALUOP 


002632 


ALUXQT 


002542 


AP4 


002551 


AP7 


002565 


APS 




BO 




81 




B2 




^3 




B4 




B5 




B6 




B7 




BASW 


003123 


BCP 


002703 


BFFP 


003221 


BFAC 


003263 


BFADD 


003224 


BFOP 


0032/3 


BFS 


003215 


BFSB 


00 3321 


BFSL 


003267 


BFSUB 


000203 


BPINIT 


000253 


BPSHRT 


020006 


BR 


003714 


BRL 


003000 


BT 


003065 


BTCVT 


003100 


BTEND 


003002 


BTR 


00303 1 


BTV 


003053 


BTX 


000177 


BYPLVL 




CO 




CI 


002032 


CALL 


002026 


CAM.CC 


000000 


CAP 55 10 


000060 


CAPABILI 


000000 


. CAPAPF 



226 

939 
1191 
•745 

*35»I 
•769 

• 782 

• 770 

• 766 

• 774 
•571 
•623 
•522 

• 550 
•562 

64 » I 
65*1 
66*1 
67*1 
68* I 
69*1 
70 « I 
71 « I 

1405 

•888 

•7 1 6 

•979 

• 1 006 
•988 

• 1016 
•970 

• 1043 

• 1010 
•707 

• 708 

• 19*1 

• 1398 

• 790 
•844 
•85 1 
•814 
•825 
•839 

• 714 
586 

1294 
847 

• 105 
•87 
•70*1 
•73*1 
•67*1 



278 

943 

1294 

724 
761 
775 
759 
763 
757 
548 
579 



325 

944 

1298 

726 



765 



560 



579 
1000 



,74-1 
767 



607 
1006 



770 



777 



618 
1040 



778 



623 
1045 



782 



756 
047 



820 
058 



829 
1071 



845 
1086 



851 
1188 



70 7 
708 
709 
70/ 



708 
71 J 
710 
708 



709 
762 
711 
709 



710 
776 
760 
710 



711 

774 
711 



758 



756 



986 
932 



028 
977 
720 
736 



837 
823 

812 
811 
783 
60 7 
1312 
906 



934 



9 77 



618 

910 



820 
030 



845 



851 



J 040 



QoQ 



I 7 1 



086 



188 



226 



73*1 
73il 



r 



'AGE b4 


HH 


000000 


CAPBLUE 


000000 


CAPCOM 


000020 


CAPOMPIO 


000000 


CAP I MA 


000000 


CAPMICR 


000040 


CAPfilM 




CC 


003400 


CCS 


007000 


CDOR 


006000 


CDOX 




CF 



PH0C14G3/LI8 





CHUF 


00271t) 


CLICK 


002/04 


CLICKS 


000360 


CLKINI 


000340 


CLKLVL 




COMF 




DH2MHH 




UE2MRL 


003606 


DEC IT 


003500 


UECP 


003473 


DEC PA 


003476 


UECP AS 


003507 


DECPIT 


003503 


DECP3 


003522 


DECX 


003172 


OF A DO 


003200 


DFAEND 


003157 


DFOP 


003165 


DFSUB 


003741 


Dl 




DIMP 


003637 


DL 




DL$DO 


002665 


DLDO 


003633 


DLHL 


003662 


DLOAD 


003640 


DLS 


003650 


DLSBC 


003656 


DLSLMP 


003653 


DLS ONE 


003655 


DLSZRO 


000310 


DLYLNG 


000316 


ULY3RT 




DMAR 



*66ll 
• 71 » I 
*68i I 
•654 I 
•64 » I 
*69i I 
122 
821 
1067 

• 1091 

•8 1 1 1 

*80tl 

114 
. 612 

840 
1010 
1303 

740 

• 728 
*72 1 

• 711 
•7 1 3 

677 
819 
819 

• 1310 
*1208 

• 1 1 96 
•1205 . 
•1225 , 

• 1221 

• 1234 
•942 
•947 
•919 
•936 

• 1422 

135 
1283 

• 1343 

671 
•671 

• 1336 

• 1375 

• 1355 

• 1365 

• 1371 

• 1368 

• 1 370 
•709 

• 710 
350 



73 » I 
73 » I 
73 » I 
73x1 
73*1 
73 » I 

159 

826 

068 



117 

617 

846 

1039 

1314 



735 
734 
7/9 

825 

825 

1249 



1203 
1206 
1219 

931 
938 
904 
933 

1/3 
1319 



654 

1 339 

1334 

1359 

1341 

1362 

1358 

764 

766 

817 



UATAPOIN.T CONFIDENTIAL INFORMATION - SEE PAGE 1 
MICRO-PRDCESSOR EMULATION SUPPORT CODE - HJS - 



79DEC12 16*20 



218 

8D6 

10 79 



150 
623 
908 
057 
1316 



73 7 



844 
844 



222 



940 



233 
1360 



353 
369 



253 
911 
080 



283 

678 

930 

1070 

1321 



266 

957 

1082 



451 

721 

937 

1085 

1339 



347 

991 

1084 



455 
724 
943 
1187 
357 



5 77 

996 



544 

726 

946 

1225 



579 
1032 



55^3 

770 
976 
2 /3 



591 
1033 



567 

778 

985 

1276 



596 
1036 



575 
782 
994 
284 



601 
1038 



576 

815 

1001 

1296 



741 
043 



606 

835 

1006 

1298 



905 
905 



997 
997 



363 
361 



945 



271 
138 1 



327 
1388 



386 



489 



509 



1 186 



1190 



224 



1228 



305 



PAGE 55 


P 


003673 


DPLOAD 


003704 


UPSTOrt 


003631 


DS 


003701 


U5T0HE 


003730 


HI 


002142 


EIROJ 


002005 


FETCH 


002013 


FETCHL 


002010 


FETCHN 


00.2000 


FETCHHW 


002003 


FETCHrt 


002017 


FETLIMP 


00367/ 


FETPL 


004000 


FLEX 




HL2MHH 




HL2MRL 


002 72 1 


HUMDO 




I02I 




I35I 




1350 




IDCOUH 




lOCODL 




IIMP 




IM2MHH 




IM2MftL 




I MAR 




IMP8 




IMPFO 




IMPH 




IMPI 




IMPL 




IMPO 


003560 


INC IT 


00345J 


INCP 


003444 


INC PA 


003447 


INCP AS 


003460 


INCP IT 


003454 


INCP5 


003525 


INCX 


003546 


INUGET 


003527 


INDX 


003622 


INDXL 


003574 


INDXS 


02 0005 


10 




IT 




ITW 




I VIOLS 


002437 


IVI0L2 



PR0C14G3/LIB 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 
MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 



79DEC12 16x20 



*1382 


1128 






















• 1389 


1133 






















*1326 
























• 1386 


1334 






















• 1409 
























• 180 


1420 






















•65 


253 


391 


494 


1322 


1384 














•69 


244 


4 77 




















*67 


151 


209 


442 


456 


518 


D87 


592 


59/ 


602 


613 


624 


725 


121 


1060 


10 72 


1087 


1096 


J 189 


1194 


122/ 


1230 


1419 


1429 


*59 


159 


176 




















•63 


508 


511 


966 


1154 


.1308 


1394 


140 7 










• 75 


402 


417 




















• 1384 


1126 






















*79i I 
























323 


345 


48 7 


506 


556 


814 


839 


909 


992 


1027 


J 372 




323 


345 


48 7 


506 


556 


814 


839 


909 


992 


.1027 


1372 




• 739 


658 






















50 7 


510 


517 


568 


















1152 
























4/5 


493 


517 


1125 


















79 


882 






















79 


882 






















175 


279 


323 


352 


388 


1320 














. 387 


489 


509 




















489 


509 






















65 


11 


113 


118 


138 


1 70 


231 


327 


441 


450 


474 


547 


5D8 


842 


1124 . 


1275 


128.1 


1293 


J311 


13 79 


1391 








400 
























591 


596 


601 


. 612 


623 


1188 


1191 


1226 


1229 


1320 






346 
























134 


136 


2/6 


324 


328 


384 


586 


591 


596 


601 


612 


623 


10d7 


1066 


1081 


1188 


1191 


1226 


1229 


1388 


1389 


1405 






168 


270 


321 




















171 


1/5 


232 


236 


278 


351 


3 55 


388 


389 


1059 


1069 


1083 


1095 


1321 


1380 


1383 


















• 1292 


1266 






















*1170 
























• 1158 
























*1167 


1165 






















• 1187 


1168 


1184 




















• 1183 


1181 






















• 1251 
























•1284 . 


1279 






















• 1268 


1249 






















•1319 - 


1299 






















• 1301 


1317 






















• 18 » I 


185 


344 


735 


812 


932 


1184 


1222 


.1279 


1359 






325 


832 


,847 


906 


910 


1030 


1059 












724 


851 






















419 


1431 






















•419 


383 


399 


414 


723 

















( 



DATAPOINT CONhlDHNTIAL INFORMATION - Stt PAGE 1 



PAGE b6 


PR0C14G3/LIB 




MICRO-PROCESSOR 
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HJS - 


79DEC12 16 


»20 




003751 


IVI0L3 


• 1431 


1403 


1416 


1426 


















02 0004 


IZ 


.*17il 


101 


159 


253 


320 


399 


414 


486 


505 


S\\ 


904 


1028 






1126 


1153 


1165 


1181 . 


1203 


1219 . 


1299 


1317 


1358 . 


1362 


1419 




002447 


JUMP 


•444 


185 


436 




















002441 


JUMPCC 


*423 
























OJOOOl 


KBSCNT 


*26«I 
























002523 


L7S 


•497 
























002531 


L7SI 


•509 


505 






















002467 


LD6 


•460 
























002502 


LU7 


•479 
























002514 


LD7CMN 


•492 


488 






















002507 


LDJI 


•489 


486 






















002537 


LDS 


•513 


























LIMP 


69 
415 


111 
1166 


160 
1182 , 


\6Q 
1204 


215 
1220 


254 
1371 


270 


321 


329 


346 


357 


400 


030000 


LINK 

LI REG 
LSPKR 
LUCF 


•4 1 1 1 
1290 
78 

771 
1040 


122 
1339 

779 
1048 


141 
1 357 

, 783 
1058 


159 
1364 

1071 


218 
1367 

1086 


237 
1 373 


253 


579 


580 


991 


1004 


1273 




LUF 


586 


913 


937 


944 


J 007 


JOIl 


1302 














MARIH 


822 


847 


906 


910 


993 


998 


.1030 


1044 












MARIL 


822 


847 


906 


910 


993 


998 


1030 


1044 












MAROH 


150 


275 


4!34 


832 


1404 


















MAROL 


133 


150 


275 


385 


455 


829 


1121 


1151 . 


1288 


1404 








MOR 


78 


114 


117 


171 


175 


232 


236 


278 


.351 


355 


451 


4:34 






475 


493 


546 


55.9 


820 


829 


845 


908 


913 


996 


1 003 


1035 






1047 


1121 


112d 


1151 


1276 


1282 


.1288 


1294 


1298 . 


1312 


1316 


1380 






1383 


























MOW 


134 


140 


324 


328 


507 


510 


820 


845 


947 


1006 


1010 


1037 






1047 


1152 


1 30 J 


J 30 7 


1388 


1393 


1406 












002250 


MEMNBAS 


•279 


2/4 






















002272 


MEMPA 


•295 


288 






















002221 


MEMPFS 


•260 


112 


1 16 


148 


169 


174 


230 


238 


326 


354 


3d8 


1433 


002220 


MEMPF2 


•259 


63 


75 


449 


453 


473 


495 


545 


557 


631 


662 


680 


003753 


MEMPF3 


• 1433 


816 


828 


836 


841 


881 


907 


912 


995 


1002 


J 034 


1046 






1 119 


1123 


1149 


1274 . 


1280 


1286 , 


1292 . 


1297 


1304 


1310 


1315 


13/8 






1382 


1390 






















0020 77 


MEMPFPS 


• 141 


137 






















002253 


MEMPQ 


•281 


2 77 






















00 2275 


MEMPR 


•299 


296 






















002270 


MEMP3 


•292 


284 






















002274 


MEMPrt 


•298 


286 






















002266 


MEMPX 


•290 


282 


293 




















020002 


MO 


• 15*1 


59 


63 


75 


112 


116 


137 


148 


J 69 


174 


230 


. 234 






2 77 


282 


326 


349 


354 


358 


449 


453 


. 473 


492 


545 


557 






.631 


662 


680 


816 


828 


836 


841 


881 


907 


912 


995 


J 002 






1034 


1046 


1119 


1123 


1149 . 


1274 , 


.1 280 . 


1286 


1292 


1297 


1304 


1310 






13J5 


1378 


1382 


1390 




















MODrt 


61 


129 


149 


223 


235 


269 


359 


663 


1418 


1428 






020003 


MP 


• 16:1 


63 


75 


112 


116 


. 137 


148 


J 69 


1 74 


230 


211 


282 






326 


349 


354 


358 


449 


453 


473 


492 


494 


545 


557 


631 
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662 


680 


816 


828 


836 


841 


881 


907 


912 


995 


.1002 


1034 






1046 


1 119 


1123 


1149 


1274 


1280 


1286 , 


1292 


1297 


1304 


1310 


1315 






1378 


1382 


1390 






















MR2HLH 


818 


843 
























MH2HLL 


818 


843 
























MH2IMH 


271 


























MR2IML 


271 


























MR2PCH 


67 


119 


173 


401 


416 


476 


1118 


1148 


1285 










MR2PCL 


67 


119 


1 73 


401 


416 


476 


1118 


1 1 48 , 


1285 










MH2SPH 


390 


























Mfi2SPL 


390 
























002444 


NOJ 


•438 


103 






















002667 


OMDO 
PC2MrtH 
PC2MRL 
PCL 


.•673 
65 
65 

in 


656 
243 
243 
215 


558 
558 


668 
668 


















002100 


PCMOD 


*145 


120 






















010000 


PDLNP 


*25il 
























003405 


PLR 


• 1 100 
























002212 


POP 


•246 
























002155 


-POPSTO 


•218 


322 






















002156 


POPSTK 


*219 


2'23 


2 55 




















000107 


PRE 


*3»I 
























000000 


PROC 


*77»I 
























002000 


PROD 


*78il 


47 






















002000 


PRODL 


*49 


51 


365 


. 786 


1089 


1435 














002000 


PRODLEN 


• 1436 


1438 






















002000 


PR OOP 


•51 


1436 






















002054 


PSHSTO 


• 122 


176 


280 


356 


















002055 


PSHSTK 


. ^123 


159 


161 




















003427 


PSR 


• 1 130 


























PSrtl 


61 
722 


129 
965 


149 
1402 


192 
1415 


223 
1425 


235 


269 


359 


382 


630 


663 


682 




PSWO 


192 


630 


965 


1417 


1427 
















002 1 1 J 


PUSH 


• 153 
























0021 17 


PUSH! 


• 163 
























1 0002 


Q 


*23tl 


347 


577 


826 


847 


856 


906 


910 


957 


1030 


1032 


1033 






.1036 


1038 


1043 


106.7 


J 068 


1079 


1080 


1082 


1084 








002147 


RETCC 


• 196 
























002206 


RETS 


•240 


216 






















002152 


RETURN 


•2 1 1 


194 






















000014 


REV 


•2»I 
























00,3202 


RIN16 


•952 


330 


360 


1008 


1012 


1041 


1049 












003105 


RIN256 


•860 


852 


914 




















003210 


RIND 


•962 


853 


868 


915 


















003115 


RINDO 


•881 


870 






















003121 


RINRPT 


•884 


880 






















003113 


RINST 


•873 


960 
























SB 


131 
1010 


348 
J 044 


353 
1226 


586 
1229 


612 
1312 


822 
1316 


.867 


913 


937 


958 


993 


998 


10002 


SCANSV 
SCDON 


•27»I 
681 


683 
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>Q 






SCDSPNL 


653 




















SCHUMS 


657 




















SCLST 


684 




















SCONMS 


655 




















SCRAMI 


299 




















SCROMLI 


290 




















SEBRLS 


275 


1404 
















00242] 


SIRO 


•395 


















002430 


SIRX 
SL 


•404 
J 032 


1079 
















003341 


SLC 


• 1053 




















SMR 


67 


110 


1.15 


167 


172 224 233 


243 


275 345 


352 


398 






413 


448 


452 


4/2 


475 48 7 491 


543 


556 668 


814 


325 






834 


839 


90:3 


909 


992 997 102/ 


1117 


1122 11 27 


114 7 


1248 






. 1265 


1277 . 


1283 


.1 28.9 


1295 1313 1377 


1381 










SP2MRH 


130 


222 


















SP2MRL 


224 




















SPIH 


388 




















SPIL 


131 


389 


















SPOL 


132 


229 


















SR 


13 77 


1036 


1 038 


1068 


1082 1084 










003350 


SRC 


• 1062 


















00 3361 


SRE 

SRMEMPE 
SRSTPE 
SRSYSMF 


*1074 

. 289 

292 

281 


















002645 


SRVDO 


•641 


72 
















002017 


SRVEND 


*74 


669 
















002024 


SRVID 


•79 


665 
















002643 


SRVNXT 
SRVREQ 


*633 
71 


742 

638 


772 
8 79 


780 


784 










002636 


SRVRPT 


•628 


884 
















002653 


SRVHTW 
STATUS 
STEK 


• 660 
.102 
266 


639 
208 


435 














002330 


STKL 


*332 


320 
















002351 


STKLPF 


•353 


349 
















002277 


STKS 

STLA 

STLSP 

STLW 

STUSCF 

SVAVIOL 

SVONEMS 

SVWVIOL 

SrtlNTE 

SrtRPT 


•303 
287 
233 
285 
.102 
295 
. 678 
298 

1417 
630 


208 

1427 
664 


435 
682 


965 














S>^USER 


129 


192 


223 


269 


382 722 .1402 


1415 


1425 






002400 


SYSM 


•367 


344 
















002372 


SYSRETO 
SYSRETl 


•362 
363 


















030001 


TEMP 1 


•42*1 


44* I 


266 


283 


451 455 575 


586 


591 596 


60.1 


612 
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( 







623 


721 


726 


815 


82£) 


821 


835 


840 


845 


846 


851 


908 






91 1 


937 


943 


946 


996 


-1006 


1010 


1039 


1040 


1057 


1058 


1070 






1071 


.1085 


1086 


1187 


1188 


1225 


1226 












030002 


TEMP2 


*43«I 
985 


45 » I 
994 


344 
1001 


555 


56 7 


576 


606 


60 7 


617 


618 


930 


9 76 


030001 


TEMPH 


•44 : 1 


117 


150 


. 678 


1284 


1298 


1316 












030002 


TEMPL 


*45«I 


114 


150 


. 678 , 


1276 


J 294 


1296 


1303 


1312 


1314 


1321 




000003 


TYPE 


*5»I 


























UCFLG 


606 


617 


1000 


1031 


1045 


.1078 


1095 














UDEH 


822 


847 


906 


998 




















UDEL 


822 


847 


906 


998 




















URA 


815 


830 


840 


1167 


1205 


















URB 


851 


947 


1366 






















URC 


.867 


958 


1365 


1368 




















URE 


1370 


























URH 


325 


353 


831 


910 


993 


1030 


10 44 














URI 


325 
1205 


348 


353 


815 


827 


831 


840 


851 . 


867 


947 


958 


1167 




URL 


160 
1220 


254 
1340 


325 


348 


82 7 


910 


993 


1030 


1044 


1 166 


1182 . 


1204 




URO 


325 
1030 


348 
1044 


353 


822 


830 


84 7 


.867 


906 


910 


953 


993 


998 




JRX 


1 1 20 


1150 . 


1 28 7 




















002143 


USERET 


• 187 


101 






















000002 


VER 

XX2MRH 

XX2MRL 


• HI 
1120 
1365 


1150 


1287 


1366 



















